cyradm: perl: symbol lookup error?

[Mogens Melander]

That could be easily tested with "lam <user>" COMMAND.

On 2015-09-18 03:40, Patrick Goetz wrote:
> Interesting.  When I use cyradm to set up a new account, I always
> execute 2 commands:
> 
>    cyradm --user administrator localhost
> 
>    localhost> cm user/daffyduck

      localhost> lam user/daffyduck

>    localhost> sam user/daffyduck daffyduck write
> 
> Does this mean that the second command has been superfluous all along
> and that these are the permissions that are created by default anyway?
> 
> I.e. it would be sufficient to just do this?
> 
>    localhost> cm user/daffyduck
> 
> 
> On 09/17/2015 03:03 PM, Patrick Boutilier wrote:
>> 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
>>> 
>> 
>> 
>> 
>> ----
>> 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

-- 
Mogens
+66 8701 33224


-- 
This message has been scanned for viruses and
dangerous content by MailScanner, and is
believed to be clean.