Adding the Perl script to the repo