Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

The Top Ten Perl Poems

by eyepopslikeamosquito (Chancellor)
on Dec 26, 2014 at 07:04 UTC ( #1111395=perlmeditation: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    package Tao::Book::1;
    
    ...
           (sub { $morning->{wind} = @_; return $morning })->(${'Tao of Pr
    +ogramming'});
    };
    ...
    
  2. or download this
    SHOCK:
    {
    ...
                  only chaos of madmen.
    # warnings:   There is no warnings;
                  there WERE no warnings.
    
  3. or download this
    # The Cow
    #    by Ogden Nash
    ...
    @ISA = qw(bovine);
    push @cow, 'moo';
    unshift @cow, 'milk';
    
  4. or download this
    # Reflections on Ice-Breaking
    #     by Ogden Nash
    ...
    @ISA = qw(dandy);
    package liquor;
    1;
    
  5. or download this
    require(AirGuitar);
    
    ...
    $parent = 000;
    $i != "want" => die;
    $i => some(time). s/never/born/ . @all;
    
  6. or download this
    scalar @monte_cristo;
    
    ...
    }
    
    grep /Red October/, @_;
    
  7. or download this
    do # to the tune of
    'Mambo'; #5, apologies to Lou Bega
    ...
    
      return [instrumental bridge];
    }
    
  8. or download this
    bless \@monks;
    $initiate = recv(MONASTERY,$enlightenment,$daily,0);
    ...
    $bishop   = join 'E','d','i','t','o','r','s';
    $pontiff  = push @monks, $improve;
    $saint    = 1;
    
  9. or download this
    use Carp qw/cluck/;
    
    ...
    }
    
    return 2,$coop and sleep until $dawn;
    
  10. or download this
    #   The Doom of the Noldor / The Prophecy of the North
    #   J. R. R. Tolkien - Quenta Silmarillion
    ...
    }
    
    sub shed{print shift}
    
  11. or download this
    substr("Erudil to the Monasterians", 0, 1);
    
    ...
    bless$ed, Perl;
    
    21 . Amen and amen;
    
  12. or download this
    use Carp;
    unpack fish, spices;
    ...
    push plate;
    END {meal};
    sleep now;
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlmeditation [id://1111395]
Approved by atcroft
Front-paged by Old_Gray_Bear
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (4)
As of 2018-08-19 09:32 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Asked to put a square peg in a round hole, I would:









    Results (186 votes). Check out past polls.

    Notices?