Perl Tricks

The code:

 BEGIN{unshift @INC, "/tmp"}

can be replaced with the more elegant:

 use lib "/tmp";

Which is almost equivalent to our BEGIN block and is the recommended approach.

@alphabet_array = ('a' .. 'z');

-kalyan