use lib ".\\";

print "$_\n" for @INC;

##</code><code>##

.\
C:\Program Files\ActiveState Komodo 3.5\lib\support\dbgp\perllib
C:/Perl/lib
C:/Perl/site/lib
.

##</code><code>##

print "$_ => $INC{$_}\n" for keys %INC;

prints in part:

IO/Socket/UNIX.pm => C:/Perl/lib/IO/Socket/UNIX.pm
IO.pm => C:/Perl/lib/IO.pm
Carp.pm => C:/Perl/lib/Carp.pm
bytes.pm => C:/Perl/lib/bytes.pm
DB/RedirectStdOutput.pm => C:\Program Files\ActiveState Komodo 3.5\lib\support\dbgp\perllib/DB/RedirectStdOutput.pm