Deleting messages

[Vernon A. Fort]

I need to find a way, via a simple perl script, to pass delete a single 
message from a email folder.

I have been just rm -f $file and then recontruct the mailbox but need a 
more effecient method.  Can you use Cyrus::IMAP::Admin and use the 
delete function on the message file?

Any pointers would greatly help!!!

Vernon