You're correct about not needing the
eval. I left that in because it was how I discovered the trick of doing a
require followed by
die in the first place, when working on code that needs Win32::CONSOLE::ANSI, but only on Windows. When debugging the program by putting
die in the middle, I was surprised that it died with the error I had circumvented with the
eval. Looking up
die, quickly set me straight that the behavior was correct.
Besides the double entendre on "Dying for a Good Japh", I like the irony that the program complains it can't find JAPH in "Just Another Perl Hacker"!
@ARGV=split//,"/:L";
map{print substr crypt($_,ord pop),2,3}qw"PerlyouC READPIPE provides"