In der Dokumentation zu Tk::BrowseEntry gibt es ein Kapitel "Subclassing", das hier interessant sein könnte. In fünf Zeilen könnte man damit ein Tk::Varname_BrowseEntry schreiben.

Zu den dreiteiligen Packagenamen: ich würde lieber nur zweiteilige Namen verwenden (also wie eben geschrieben). Der Grund ist, dass die Tk-Klasse aus der letzten Komponente gebildet wird. Das kann oder kann nicht gewünscht sein.

Vielleicht könnte man schmutzigerweise Populate() in Tk::Widget erweitern. Dann hätte man die neue Option in *allen* Tk-Widgets ohne Änderung.