Hi,
[...]
thx for your answer, but:
>
> The eval should have caught the die. However I would personally
> have placed the assignment outside the eval
>
> $oSASL = eval { Authen::SASL->new(
> mechanism => "GSSAPI",
> callback => {
> user => ' ',
> },
> ) };
$sSASLMech = "GSSAPI";
$oSASL = eval { Authen::SASL->new(
mechanism => $sSASLMech,
callback => {
user => ' ',
},
) };
still results in
No SASL mechanism found
at c:/Programme/Perl/site/lib/Authen/SASL.pm line 73
(this time tested in a Windows environment with Perl 5.8.4)
>
> This should not cause you application to exit, but $oSASL would
> be undef and the error message you saw previously should be in $@
That is exaxctly what I want - but ...
>
> Graham.
>
>
Bye.
Michael.
