Scripts for issue #85


Perl