adding Perl scripts