----- Original Message -----
From: "Suresh Govindachar" <[EMAIL PROTECTED]>
.
.
> sub auth {
> my (\$self, \$username, \$password) = [EMAIL PROTECTED];
>
> eval {
> require MIME::Base64;
> require Authen::SASL;
> } or \$self->set_status(500, ["Need MIME::Base64 and Authen::SASL todo
> auth"]), return 0;
I can't even get (a stripped down version of) that sub to compile:
-------------------------------------
C:\_32\pscrpt>type try.pl
sub auth {
my (\$self, \$username, \$password) = [EMAIL PROTECTED];
}
C:\_32\pscrpt>perl try.pl
Can't declare single ref constructor in "my" at try.pl line 2, near ") ="
Execution of try.pl aborted due to compilation errors.
C:\_32\pscrpt>
-------------------------------------
Cheers,
Rob
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
