I haven't had a chance to test this, but how about: #################################### use strict; use warnings; use File::Find; find(sub{unlink if /,ST$/},"/my/directory/"); ####################################
-----Original Message----- From: news on behalf of John Schmerold Sent: Wed 1/28/2004 9:44 PM To: [EMAIL PROTECTED] Cc: Subject: Regex command to remove deleted emails I'm trying to use the following to remove deleted emails (deleted emails have file names that end in ",ST"): <snip>