$ perl -e'Socket->VERSION(1.3)'
Socket defines neither package nor VERSION--version check failed at -e line 1.
####
$ perl -e'BEGIN { $INC{"Socket.pm"}=1; } use Socket 1.3'
Socket defines neither package nor VERSION--version check failed at -e line 1.
BEGIN failed--compilation aborted at -e line 1.
####
$ perl -e'BEGIN { 1 for $INC{"Socket.pm"}; } use Socket 1.3'
Socket defines neither package nor VERSION--version check failed at -e line 1.
BEGIN failed--compilation aborted at -e line 1.
####
BEGIN {
if (exists($INC{"Socket.pm"}) {
if (defined($INC{"Socket.pm"}) {
warn(">>> \"$INC{"Socket.pm"}\"\n");
} else {
warn(">>> undef\n");
}
} else {
warn(">>> absent\n");
}
}