My first experience with Perl.