for my $file (@files){
  if( -f $file ){
    report($file);  # however you want to report a match
    if( unlink $file ){
      print "Deleted $file\n";
    } else {
      warn "Unable to delete $file\n";
    }
  }
}