give me an error - failed to delete on line 12 but it does indeed delete. I'll have to debug later and investigate method of grabbing error and standard out that you pointed me to. I can see that this is trying to suck me into perl and I have avowed not to dirty my hands.
Hm, strange. I'd kinda expect delete to return something usable for checking the error status.
Anyhow, instead of checking the return value of function, you can simply check if error is defined (stolen from Cyrus::IMAP::Admin man page):
$imap->delete("user.public"); die $imap->error if $imap->error;
Of course, above error checking can be done in at least dozen more ways (just like anything else in Perl). Perl supports various definitions of what is beautiful code.
This will print usable error message in case of an error, and abort further execution of the program.
(you may change all error checking of Cyrus::IMAP and Cyrus::IMAP::Admin methods in entire script to be done like above).
-- Aleksandar Milivojevic <[EMAIL PROTECTED]> Pollard Banknote Limited Systems Administrator 1499 Buffalo Place Tel: (204) 474-2323 ext 276 Winnipeg, MB R3T 1L7 --- Cyrus Home Page: http://asg.web.cmu.edu/cyrus Cyrus Wiki/FAQ: http://cyruswiki.andrew.cmu.edu List Archives/Info: http://asg.web.cmu.edu/cyrus/mailing-list.html