in reply to Annoyance with Tk::FileDialog in MSWindows

Hi mtr4cv,

You might want to try something like this ...
if ( $^0 eq $windows ) { $userFile = $top->getOpenFile ( ... ); } else { # do the way that's works already ... }