[ejabberd] external auth

[Jesse Thompson]

jbowers wrote:
> Jorge Guntanis wrote:
> As long as I'm replying, the perl code we use locally is:
> my ($op,$user,$domain,$password) = split /:/,$buf,4;
 >
> The "4" means it stops splitting at that point. I know we have users 
> with colons in their password and it is not a problem.

I always forget about that parameter to split.

Here is another way to do it.

my ($op,$user,$domain,$password) = $buf =~ /^(.+?):(.+?):(.+?):(.+)$/;

Jesse
-------------- next part --------------
A non-text attachment was scrubbed...
Name: smime.p7s
Type: application/x-pkcs7-signature
Size: 3340 bytes
Desc: S/MIME Cryptographic Signature
URL: <http://lists.jabber.ru/pipermail/ejabberd/attachments/20090416/3b5514e1/attachment.bin>