in reply to
My First JAPH
What about this?
print pack"B*", $_ for qw(
01001010 01110101 01110011 01110100 00100000 01100001
01101110 01101111 01110100 01101000 01100101 01110010
00100000 01010000 01100101 01110010 01101100 00100000
01001000 01100001 01100011 01101011 01100101 01110010 );
Perhaps you should have a look at this node ...
But my method is more confusing to non Perl people, which was my main goal.
confusing does not necessarily mean obfuscated.
To non Perl people, even normal Perl usage of map, grep
and unless may elude their comprehension. Make something that may
puzzle a Perl hacker, and you'll be on the right track.
Spend some time analyzing good obfuscated nodes, as listed
in my previous post.
Use subroutines for code reuse
Master regular expressions
Write my GUIs with Perl
Abandon CGI in favor of some modern web framework
Put my code in modules
Create CPAN distributions
test and document my code as I write it
Write OOP with or without animal help
Finally switch to a modern Perl style
Create a killer application with Perl
Detoxify from Perl and PerlMonks
Choose another language because Perl is dead
Learn to program for mobile devices
Complete my secret world domination project
None, because the road to hell is paved with good intentions
Results (248 votes),