Select Code to Download

#!/usr/bin/perl -w
use strict;
...
# very easy to do mistake
# can lead to hours of bughunting
print 1 + scalar($results{'results'}->[0]), "\n";

par@maxlance ~/projects $ perl -V
Summary of my perl5 (revision 5 version 8 subversion 8) configuration:
...
    /usr/local/lib/site_perl
    .
par@maxlance ~/projects $