Craig White wrote:
Trying to script deleting a user's mailbox from system...

/bin/su - cyrus -c '/usr/lib/cyrus-imapd/cyradm localhost \ --userrc=/var/lib/imap/.systemrc dm user.public'

Try something like this instead:

#! /usr/bin/perl -w

use Cyrus::IMAP::Admin;

$imap = Cyrus::IMAP::Admin->new("servername")
   or die "Failed to connect";
$imap->authenticate("-user" => "username",
                    "-password" => "password",
                    "-mechanism" => "LOGIN")
   or die "Failed to authenticate";
$imap->delete("user.mailbox")
   or die "Failed to delete mailbox";

See man pages for Cyrus::IMAP::Admin and Cyrus::IMAP for more details.

--
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

Reply via email to