print $_ . " => " . $INC{$_} . "<br>" for keys %INC;