for( @files_to_delete ) {
     # untaint $_ here
     unlink or print "failed to remove $_: $!\n";
  }