Licensed under the Perl Artistic license:
http://perldoc.perl.org/perlartistic.html