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