Ricardo Ferreira wrote:
> wait wait wait.
>
> in mac os x work fine but in windows xp professional I have this troble
> above
>
>
> use Encode;
>
> $pdf = encode("iso-8859-1",); # i will put here "ç á é ó õ" ...
> chomp $pdf;
>
> system "echo $pdf";
>
> ..
wait wait wait.
in mac os x work fine but in windows xp professional I have this troble
above
use Encode;
$pdf = encode("iso-8859-1",); # i will put here "ç á é ó õ" ...
chomp $pdf;
system "echo $pdf";
...
this code do nor work...
shows: ╬ ' ¢ ä
Oops
I get it!
i just use Encode
sorry for that...
**
___
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
no one can help?
2007/1/8, Ricardo Ferreira <[EMAIL PROTECTED]>:
use Tk;
my $mw = MainWindow -> new(-title => 'ola' );
sub cam {
system "ls $dirr";
}
$mw->Entry(-textvariable => \$dirr)->pack;
$mw->Button(-text => 'mostrar', -command => \&cam)->pack;
MainLoop;
...
