Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -sire
    
    ...
    he oft used a hammer
    when parsing his grammar
    and never the wiser was him
    
  2. or download this
    #!/usr/bin/perl -sire
    
    ...
    he oft used a hammer
    when parsing his grammar
    and never the wiser was him
    
  3. or download this
    s**lil*;  $*=join'',sort split q**;  s;.*;grr; &&s+(.(.)).+$2$1+; $; =
    qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)