in reply to find and delete file in Drive

You can use File::Find to find the file and unlink to delete it.

There are several examples in both sets of documentation that will get you there.

UPDATE
Other Notes: Use strictures and warnings.
Indent your code (at least for us)
Don't use chop. Use chomp
Use a real array and push

# ex my @drives; # you want an array foreach (<FSUTIL>) { chomp; # don't use chop push(@drives, $_); } close(FSUTIL);
grep
One dead unjugged rabbit fish later...