Skip Menu |

This queue is for tickets about the Authen-SASL CPAN distribution.

Report information
The Basics
Id: 55954
Status: new
Priority: 0/
Queue: Authen-SASL

Owner: Nobody in particular
Requestors: v.gusakov [...]

Bug Information
Severity: Critical
Broken in:
  • 2.11
  • 2.14
Fixed in: (no value)

Subject: eval inside Authen::SASL::Perl->client_new dies on Linux due to signals
MIME-Version: 1.0
Content-Type: text/plain; charset="UTF-8"
X-Mailer: MIME-tools 5.427 (Entity 5.427)
Content-Disposition: inline
Content-Transfer-Encoding: binary
X-RT-Original-Encoding: utf-8
Content-Length: 754
Download (untitled) / with headers
text/plain 754b
inside Authen::SASL::Perl->client_new there's an eval which is intended to try to find package for the given auth mechanism, and if it's not found - go to next mechanism: my @mpkg = sort { $b->_order <=> $a->_order } grep { my $have = $have{$_} ||= (eval "require $_;" and $_- Show quoted text
>can('_secflags')) ? 1 : -1;
$have > 0 and $_->_secflags(@sec) == @sec } map { (my $mpkg = __PACKAGE__ . "::$_") =~ s/-/_/g; $mpkg; } split /[^-\w]+/, $parent->mechanism or croak "No SASL mechanism found\n"; eval "require $_;" works fine on Win, but it fails on Linux. I had to add local $SIG{'__DIE__'}; right before my @mpkg = sort Bug revealed itself last night when Gmail servers update adding XOAuth mechanism reached our server :)

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to