Thanks it is working now!
now i am thinking how to gets this file in "" but i beleve i can do that
thanks again
2007/1/28, Bill Luebkert <[EMAIL PROTECTED]>:
Ricardo Ferreira wrote:
> Hi
>
> I am using perl/tk and getopenFile to get the full path of multiples
files
> then i am use "-multiple => 10".
> ok I would like to get the full path of this
> files, end put this in one variable.
>
> but when a do:
>
>
> sub Filess {
> $mainfile = $mw->getOpenFile(-multiple => 100);
>
> print $mainfile;
> }
>
> when I choose the file the program print it : "ARRAY(0x1e66134)"
> i do not want it, I want : "e:\file1" e:\file2", or "\root\file1"
> "\root\file2".
>
> is possible to get the full path of multiple or one file with
GetOpenFile ?
It appears that $mainfile is an array ref, try:
my $mainfile = $mw->getOpenFile(-multiple => 100);
print "@$mainfile\n";
or
my @mainfile = $mw->getOpenFile(-multiple => 100);
print "$_\n" foreach @mainfile; # or print "@mainfile\n";
--
Ricardo Ferreira Teixeira
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
