Hi,

I have a problem with the following code:

sub FileSelect {
        my $types = [
                    ['S19 Files',       ['.s19']],
                ['All Files',        '*',   ],
                ];
$filename = $leftframe->getOpenFile(-filetypes=>$types);
($name, $dir, $suffix) = fileparse($filename, ".s19");
@hexfiles=glob("$dir/*.hex");

if $dir contains whitespaces, @hexfiles doesn't get anything. How can I
prevent that?

Lars
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to