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.
None - I don't code
0 - Ticker-tape is a purer representation of a Turing Machine
1 - A laptop screen or single monitor desktop workstation
1 - And it's cracked. And I like practicing my trade while lying on a bed of nails
2 - The standard dev kit suits me fine
3 - Fewer than three monitors wouldn't present enough insight into what I'm working on
4 - Everyone else has two or three. I'm not like everyone else
5 - This configuration reminds me of the 1987 5-cylinder VW Passat my parents let me drive in high school
6 - I saw such a thing on the Internet, and had to have it
6 - Because I haven't figured out how to add more
7 - I need all the luck I can get, for this code to work
8 - Because my power strip had eight outlets available
9 - A 3x3 array was the the most I could fit into my Faraday shielded SHTF headquarters
More than 9 - Most of them are just displaying graphs / mock code to make the boss think I'm doing something critical
Results (601 votes). Check out past polls.