Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
        print join ("\n", map {"$_->[1]: $_->[0]"} @letters), "\n";
        ++$paraNum;
    }
    
  2. or download this
    Paragraph 1:
    e: 15
    ...
    a: 8
    r: 5
    d: 4