jars@jars-desktop$ perl -MData::Dumper -le 'print Dumper \%INC;  if ( eval "use CGI;1;" ) { print Dumper \%INC }; '
$VAR1 = {
          'warnings/register.pm' => '/usr/share/perl/5.8/warnings/register.pm',
          'bytes.pm' => '/usr/share/perl/5.8/bytes.pm',
          'XSLoader.pm' => '/usr/lib/perl/5.8/XSLoader.pm',
          'Carp.pm' => '/usr/share/perl/5.8/Carp.pm',
          'Exporter.pm' => '/usr/share/perl/5.8/Exporter.pm',
          'warnings.pm' => '/usr/share/perl/5.8/warnings.pm',
          'overload.pm' => '/usr/share/perl/5.8/overload.pm',
          'Data/Dumper.pm' => '/usr/lib/perl/5.8/Data/Dumper.pm'
        };

$VAR1 = {
          'warnings/register.pm' => '/usr/share/perl/5.8/warnings/register.pm',
          'bytes.pm' => '/usr/share/perl/5.8/bytes.pm',
          'XSLoader.pm' => '/usr/lib/perl/5.8/XSLoader.pm',
          'Carp.pm' => '/usr/share/perl/5.8/Carp.pm',
          'vars.pm' => '/usr/share/perl/5.8/vars.pm',
          'strict.pm' => '/usr/share/perl/5.8/strict.pm',
          'Exporter.pm' => '/usr/share/perl/5.8/Exporter.pm',
          'constant.pm' => '/usr/share/perl/5.8/constant.pm',
          'warnings.pm' => '/usr/share/perl/5.8/warnings.pm',
          'CGI/Util.pm' => '/usr/local/share/perl/5.8.8/CGI/Util.pm',
          'overload.pm' => '/usr/share/perl/5.8/overload.pm',
          'CGI.pm' => '/usr/local/share/perl/5.8.8/CGI.pm',
          'Data/Dumper.pm' => '/usr/lib/perl/5.8/Data/Dumper.pm'
        };

jars@jars-desktop$