In this case I would put back the second foreach loop:

  foreach my $chk_file(@filelist) {
      #if($chk_file=~/$f_name/) {
      if($f_name=~/$chk_file/) {      
        print "$c - Found and to be deleted: $files\n";
      }
   }
[download]