Scripts for issue #65


Perl