Added script to remove files with perl