FileSelector

FileSelector() opens a widget that allows the specification of a file name:

my $fname = Spectra::FileSelector( -defaultextension => '.pl', 
                                    -initialfile => "$filename"); 
                                    -initialdir => "$dirname");

All parameters are optional.