Net::DNS::Resolver::Base - Problem mit IO::Socket::Inet6 - #119622 (Fragen zu Perl-Modulen)

Gast dude

2009-03-20 16:13

Naja war ja relativ offensichtlich worin der Fehler bestand.
im custom error handler wird ja die Fehlermessage mit shift empfangen, deshalb sollte man diese vllt auch übergeben ;-)

Ein

Code (perl): (dl )

    $main::SIG{__DIE__} = sub {
                            my $arg = shift;
                            if( !ineval() ) {
                                $handler->($arg);
                            }
                        };

löst das Problem. Jetzt bin ich rundum zufrieden, bis zum nächsten Fehler versteht sich ;-)