Hello all!
I have a strange behaviour, any idea or help is welcome.
I've developed a program in Linux that by dependencies needs
/usr/lib/perl5/Net/DNS/Resolver.pm
The last release of Resolver.pm starts with a BEGIN block like follows:
*use vars qw(@ISA);BEGIN { for ( $^O, 'UNIX' ) { my
$class = join '::', __PACKAGE__, $_; return @ISA = ($class)
if eval "require $class;"; } die 'failed to load platform
specific resolver component';}*
The program works, so I created the executable to make an easier
deployment...
but I am surprised to see that it fails with the message: *failed to load
platform specific resolver component*
The workaround is replace the BEGIN by something platform dependent:
require Net::DNS::Resolver::UNIX;
@ISA = qw(Net::DNS::Resolver::UNIX);
Any idea?
Cheers,
Peco