substr("Erudil to the Monasterians", 0, 1); 1 . Erudil->isa(PerlHacker) .. [ "vroom", @saints, @monastery ]; 2 . undef $^W, close(STDERR) and !$! for 1..100; 3 . -M Erudil > 2*365 and $appreciation{$_}++ for qw( place custodians members ); 4 . do { for (@brothers, @sisters) { listen up, hearken } continue { to: wait() and study() for grep !clue($_) && ignorant($_), Visitors- To-Our-Blessed-Monastery } }; 5 . do { not rebuke($words{harsh} =~ /RTFM/), but }, lead-with-URLs if wisdom->isa( goal-of-theirs); 6 . allow for newbies and instruct(grep $_, @contents); 7. for 0 < grep errant || ignorant, @us; 8 . consider; these: 9 . ($^H & 0x602) and bless($they), for typos < troubles; 10 . $^W and bless($they), for $errors -> (0); 11 . %CGI:: and bless($they), for eval { pass-parameters } and not $@; 12 . eval "use CPAN; 1" and bless($they), for $wheels_not_reinvented > 1e9; 13 . qr// and bless($they), for HTML-time == 0; 14 . insults? ridicule? blessed: are: you, for time and effort < theirs; 15 . grep refuser($_), @those ? (do { not allow flame wars } or disrepute): yourselves or Monastery; 16 . study well::, $$ = 0 for grep cool lost, grep flamewar winner, @men; time < age-of-reason and 17 . those who suffer thus, do { consider: like me, close mouth, select words, carefully, to edify, to inform }; 18 . $_++ for @brothers, @sisters, restorers-of-faith and $^T = time, 19 . good-syntax and efficient- algorithms; 20 . eval { $$ref; 1 } and study, study Perl, study bless$ed, Perl; 21 . Amen and amen;