Ich habe zwar wenig Ahnung von Perl/Tk, aber laut Dokumentation fehlt bei Deinem Code ein $FSref->Show(); um das Dialogfenster auch anzuzeigen.