Examples for
Programming Perl
, Chapter 1
MISC
gradation