phroggy.com: Weblog Archive: Just Another Perl Hacker

Weblog Navigation

First

Previous

Index

Next

Last

Just Another Perl Hacker (Tuesday, March 1^st, 2005)

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";

Weblog Navigation

First

Previous

Index

Next

Last

Themes

Theme:

Background:

Random Quote

“Give beer to those who are perishing, wine to those who are in anguish; let them drink and forget their poverty and remember their misery no more.”
- Proverbs 31:6-7 (NIV)