#!/usr/bin/perl (@@)=(@_)=("a".."z")[9,20];foreach(@@){$_-=3;foreach(@_) {print;}}print"g",("a".."z")[@_[0]-@_[0],-@@[0],(-((@_[1] -@@[0])*2)-2)],"?\n";$_=<>;($a,$j,$u)=("a".."z")[-2,-(@@[0] -1),(-((@_[1]-@@[0]))-5)];if(/^$a$j$u$/i){print"g";foreach(@@) {foreach(@_){print @_[1]-@_[1];}}print"!\n";}
A reference to Blackout's box... (blackout.com)

Replies are listed 'Best First'.
Re: First post, first obfuscation
by geoffd1 (Initiate) on Jul 30, 2003 at 16:54 UTC
    Whoops, it logged me out, for some reason. That code snippet was mine.
      i liked it :) The fact that i had to enter a reply caught me off guard the first time I ran it.
        i'm almost certainly being very stupid - but what is the answer you're supposed to put in? alex