~ $ perl -lwe '{package My; sub x {}} $INC{"My.pm"}=1;                print for keys %{"My::"}'
x
~ $ perl -lwe '{package My; sub x {}} $INC{"My.pm"}=1; eval "use My"; print for keys %{"My::"}'
import
x