cyradm: perl: symbol lookup error?

Patrick Boutilier boutilpj at ednet.ns.ca
Thu Sep 17 16:03:25 EDT 2015


On 09/17/2015 04:07 PM, Patrick Goetz wrote:
> Thanks.  I'm just now getting around to looking at this script.  This
> creates a mailbox, but don't you also need to set access privileges for
> the user associated with this mailbox?

Only if you are going to change the default rights. User will have 
access by default.





>
>
>
> On 09/16/2015 12:00 PM, Patrick Boutilier wrote:
>>
>> We use this simple perl script to add users. Fill in appropriate
>> username and password.
>>
>>
>>
>>
>>
>> #!/usr/bin/perl -w
>> #
>> use File::Basename;
>> use IMAP::Admin;
>>
>> if ( 0 == scalar( @ARGV ) ) {
>>     die( "\n  Usuage: $0 userid\n");
>> }
>>
>>
>> $mailbox = "user.$ARGV[0]";
>> $username = "";
>> $password = "";
>>
>> # Set this to the hostname of your IMAP server
>> $IMAPSERVER = "localhost";
>> #
>>
>> # Main Code
>> #
>> # Login to IMAP server
>> $imap = IMAP::Admin->new('Server' => $IMAPSERVER,
>>                            'Login' => $username,
>>                            'Password' => $password,) || die "no go $! !";
>>
>> print "Login: " . $imap->error . "\n";
>>
>> # Add user
>> $add = $imap->create("$mailbox");
>>
>> if ($add != 0) {
>>           print "Error: " . $imap->error . "\n";
>> }
>> else {
>>           print "$ARGV[0] added.\n";
>> }
>>
>>
>> # Close connection
>> $imap->close;
>> exit;
>>
>>
>> ----
>> Cyrus Home Page: http://www.cyrusimap.org/
>> List Archives/Info: http://lists.andrew.cmu.edu/pipermail/info-cyrus/
>> To Unsubscribe:
>> https://lists.andrew.cmu.edu/mailman/listinfo/info-cyrus
>>
> ----
> Cyrus Home Page: http://www.cyrusimap.org/
> List Archives/Info: http://lists.andrew.cmu.edu/pipermail/info-cyrus/
> To Unsubscribe:
> https://lists.andrew.cmu.edu/mailman/listinfo/info-cyrus
>

-------------- next part --------------
A non-text attachment was scrubbed...
Name: boutilpj.vcf
Type: text/x-vcard
Size: 286 bytes
Desc: not available
Url : http://lists.andrew.cmu.edu/pipermail/info-cyrus/attachments/20150917/3b3be16c/attachment.vcf 


More information about the Info-cyrus mailing list