Added Perl scripts for dealing with files