Or even use Tk::PathEntry instead of Entry. This one lets you use the <Tab> key for completion as in modern shells.