Scripts for issue #66


Perl