#!perl -w
use strict;
use Data::Dumper;
use IO::Socket;

# whatever you need to do to make the error message/warning show up in INET6.pm

print Dumper \%INC;