Scripts for issue #93


Perl