perl -d:Trace -MDir::Pkg -E"Dir::Pkg->new()"