$ perl -E 'use Tk; say $INC{"Tk.pm"}'

##</code><code>##

$ perl -E 'use Tk::Balloon; say $INC{"Tk/Balloon.pm"}'