For my first obfu I shall attempt to draw a hedgehog... go on... use your imagination!
#!/usr/bin/perl -w
use strict;
#-
$;#-
='j'#-
;$"=#-
'p';#-
;@_#-
#=$[#-
=('a'#-
,'h');#-
print$;#-
."@_"#-
;#-
#-
Neil
Update: Node slightly edited, just an apology for writing "Perl" (now /usr/bin/perl) after the shebang on the first line... my excuse is Windows at work making me sloppy! Thanks
podmaster! Hmmm.. then I lost the bang... thanks
claree0... I really should be more careful!