Regex command to remove deleted emails

From: John Schmerold (John_at_katy.com)
Date: 01/29/04


To: beginners@perl.org
Date: Wed, 28 Jan 2004 23:44:01 -0600

I'm trying to use the following to remove deleted emails (deleted emails
have file names that end in ",ST"):
    rm -f $(find /home/vmail Maildir | grep ,ST)

This works well for the most part, however some files don't get deleted,
I suspect because of their length or characters in the pathname. For
example, following was not deleted:
/home/vmail/jam/Maildir/.Personal items.Saved
mail/cur/1060014026.M14682P23099V0000000000000904I00105790_15.mail.lp.com,
S=33883:2,ST

Anyone know of a way to include a delimiter or other function to force
the removal of files such as one above?