my $userSelectedFile = $top->getOpenFile( -defaultextension => "", -filetypes => [ ['Directories', '.dir'], ['Dirs', '.'], ['Folders', ''], ['All Files', '*'] ], -initialdir => "C:\\TEMP", -title => "Select file 1" );