in reply to Mailing Using Perl

Try the following 
...
foreach(@files) {
  chomp; ## Add this line..
  $main::delFileName = $_;

[download]

     Potentia vobiscum ! (Si hoc legere scis nimium eruditionis habes)

In Section Seekers of Perl Wisdom