Sometimes there can be path issues when multiple Perl versions are installed. The @INC path may have some bogus stuff in it. Here is some simple code to dump @INC and %INC. Note the difference in how much stuff happens by including the use DBI; vs not.
#!usr/bin/perl -w
use strict;
#use DBI;
print join("\n",@INC),"\n\n";
foreach (keys %INC)
{
print "$_=>$INC{$_}\n";
}
__END__
without use DBI;
----------------
C:/Perl/site/lib
C:/Perl/lib
.
C:/Perl/site/lib/sitecustomize.pl=>C:/Perl/site/lib/sitecustomize.pl
strict.pm=>C:/Perl/lib/strict.pm
WITH use DBI:
--------------
C:/Perl/site/lib
C:/Perl/lib
.
C:/Perl/site/lib
C:/Perl/lib
.
XSLoader.pm=>C:/Perl/lib/XSLoader.pm
re.pm=>C:/Perl/lib/re.pm
warnings/register.pm=>C:/Perl/lib/warnings/register.pm
C:/Perl/site/lib/sitecustomize.pl=>C:/Perl/site/lib/sitecustomize.pl
List/Util.pm=>C:/Perl/lib/List/Util.pm
ActiveState/Path.pm=>C:/Perl/lib/ActiveState/Path.pm
Cwd.pm=>C:/Perl/lib/Cwd.pm
warnings.pm=>C:/Perl/lib/warnings.pm
DBI.pm=>C:/Perl/site/lib/DBI.pm
File/Basename.pm=>C:/Perl/lib/File/Basename.pm
Config.pm=>C:/Perl/lib/Config.pm
ActivePerl/Config.pm=>C:/Perl/lib/ActivePerl/Config.pm
Carp.pm=>C:/Perl/lib/Carp.pm
Scalar/Util.pm=>C:/Perl/lib/Scalar/Util.pm
Exporter/Heavy.pm=>C:/Perl/lib/Exporter/Heavy.pm
strict.pm=>C:/Perl/lib/strict.pm
Exporter.pm=>C:/Perl/lib/Exporter.pm
vars.pm=>C:/Perl/lib/vars.pm
constant.pm=>C:/Perl/lib/constant.pm
Config_heavy.pl=>C:/Perl/lib/Config_heavy.pl
AutoLoader.pm=>C:/Perl/lib/AutoLoader.pm
DynaLoader.pm=>C:/Perl/lib/DynaLoader.pm
|