in reply to Great Perl Literature

Not all great literature, just a few fun ones that popped into my head while scanning my shelves:

# fiction: eval {die "22\n"}; $@ == 22? print "Gotcha":die $@; #!/usr/bin/perl # ... rest of code @years = (undef) x 100; use Acme::Bleach; use Tie::Cycle; tie my $foucault, 'Tie::Cycle', [-1,1]; # non-fiction: use Devel::Peek; # ... print Dump($gray); $cosmic->(); use Carp; sub species {confess()} $delta = (localtime)[2]-(gmtime)[2]; print abs($delta * 15), $delta>0?'E':'W'; $prehistory =~ /$patterns/


# fiction: Catch 22 (Joseph Heller) The Unconsoled (Kazuo Ishiguro) [no '-w' no 'use strict' == no sympathy] One hundred years of solitude (Gabrial Garcia Marquez) Out of Sight (Elmore Leonard) Foucault's Pendulum (Umberto Ecco); # non-fiction: Gray's Anatomy (Henry Gray) The Cosmic Code (Heinz Pagels) Origin of Species (Charles Darwin) Longitude (Dava Sobel) [it's the general idea, not the accuracy that matters] Patterns in Prehistory (Robert Wenke)