Perl nuggets