Skip to content

Instantly share code, notes, and snippets.

Stantheman /
Last active November 18, 2018 01:56
Information Warfare Research Project (IWRP)

Information Warfare Research Project (IWRP)

The Information Warfare Research Project (IWRP) is being run by the Navy (SPAWAR).

Advanced Technologies International (ATI) won the contract to lead the consortium. This process is called "Other Transaction Authority" (OTA), which is why a contractor can lead the process of interacting with other companies.

IWRP website: ATI website:

The list of companies being subcontracted(?) to was released in the Federal Register:

Stantheman / iwrp-companies.txt
Created November 18, 2018 01:48
Information Warfare Research Project (IWRP)
2 Twelve Solutions, Arlington, VA
Aeronix, Inc., Melbourne, FL
Applied Engineering Concepts, Inc., Eldersburg, MD
Applied Signals Intelligence, Inc., Sterling, VA
Applied Technical Systems, Inc., Silverdale, WA
Aquabotix Technology Corporation, Fall River, MA
Aspen Consulting Group, Inc., Point Pleasant, NJ
AT&T Government Solutions, Inc., Vienna, VA
Atlantic CommTech Corp., Norfolk, VA
Avineon, Inc., McLean, VA
Stantheman /
Last active January 15, 2018 05:05 — forked from crushedhat/
import gameClass
import time
def mainMenu():
print " Welcome to the Blackjack table! Please select an option below"
print " ========================================================================="
print " ==============================(1) New Game =============================="
print " ==============================(2) Exit =============================="
Stantheman /
Created March 31, 2012 17:08
One-Liner to get approximate size of remote Apache directory listing using wget and perl
wget -r -nd -np --spider http://URL_GOES_HERE 2>&1 | perl -ne '$size += $1 if $_ =~ m/^Length: (\d+)/; END{print $size . "\n";}'
Stantheman /
Created December 4, 2013 02:28
Someone in #climagic on freenode said they wanted every command to automatically be pumped into @busyloop 's lolcat repo ( This is the work in progress. Works fine, just plop into place, there's a package for perl fuse in Debian. Set PATH=/opt/stan/badidea (or wherever) and have cool colors. stage 2 would be t…
use strict;
use warnings;
use Data::Printer;
use Fuse;
my $mountpoint='/opt/stan/badidea';
Stantheman /
Created July 13, 2013 21:38
comparing typeglob aliases to references
#!/usr/bin/env perl
use strict;
use warnings;
use Benchmark qw( timethese cmpthese ) ;
my $a=10;
*b = *a;
my $ref = \$a;
#!/usr/bin/env perl
use strict;
use warnings;
use Benchmark qw( timethese cmpthese ) ;
my $r = timethese( -10, {
val => sub {
my @arr;
push @arr, $_ for (1..10000);
Stantheman /
Last active December 16, 2015 04:39
Sean Connery voice maker. <3 cloud
# Sean Connery voice maker
# shhhay the word
function connify {
word=$(sed -E 's/(s|ch)/shhhh/g' <<< $word)
echo -n "$word "
Stantheman / output
Created March 14, 2013 02:42
compare perl substitution against "chop if substr($var, -1) eq"
Benchmark: running sed, substr_if for at least 20 CPU seconds...
sed: 21 wallclock secs (21.10 usr + 0.00 sys = 21.10 CPU) @ 1937388.20/s (n=40878891)
substr_if: 21 wallclock secs (21.22 usr + 0.03 sys = 21.25 CPU) @ 2412531.58/s (n=51266296)
Rate sed substr_if
sed 1937388/s -- -20%
substr_if 2412532/s 25% --
Stantheman / output
Last active December 14, 2015 21:09
perl substr, verse substition, versus lvalue substring speed comparison using Benchmark. regular substr won by a larger margin than I thought, which makes me generally happy
# running 5.10.0, but according to, these benchmarks might be out of sync:
# Assignment to substr in void context is now more than twice its previous speed. Instead of creating and returning a special lvalue scalar that is then assigned to, substr modifies the original string itself.
# substr no longer calculates a value to return when called in void context.
Benchmark: running l_substr, sed, substring for at least 10 CPU seconds...
l_substr: 11 wallclock secs (10.30 usr + 0.01 sys = 10.31 CPU) @ 1455470.71/s (n=15005903)
sed: 10 wallclock secs (10.35 usr + 0.04 sys = 10.39 CPU) @ 433279.21/s (n=4501771)
substring: 11 wallclock secs (10.44 usr + 0.01 sys = 10.45 CPU) @ 2926646.89/s (n=30583460)
Rate sed l_substr substring
sed 433279/s -- -70% -85%