Weblog Navigation
My first JAPH:
#!/usr/bin/perl
for $a(1,46){for $b(0..7){$c=0;$_?hex substr(q), "ef7fa1866706ca",
Just another Perl Hacker, ("eff02289402844"),2*$_+$a,2)&2**(7-$b):
/..phroggy../ and $c+=2**(7-$_)for(0..7);$d.=chr $c;}}print"$d\n";