All kinds of example code for Perl.