Scripts for issue #59


Perl