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