use encoding (was: Re: uc/lc v unicode)

[Ondrej Koala Vacha]

On Thu, 6 Jan 2005, Honza Pazdziora wrote:

> Ano. Netrapte se s 5.8.0, tam opravdu spousta veci nefunguje.
> Doporucuji minimalne 5.8.1, optimalne posledni 5.8.*, kterou najdete.
> 

Takze uz mam  v5.8.5 uc/lc funguje jak ma. Ale zda se, ze v teto verzi 
perlu je use encoding jiz lokalni pro soubor. Zda se mi to dobre?


$ cat test.pl
use open ":std",
	IN  => ":encoding(iso-8859-2)",
	OUT => ":encoding(iso-8859-2)";
	use encoding 'iso-8859-2';

use bb;
bb::nn();

$ cat bb.pm
package bb;

sub nn{

  use FileHandle;
  my $F = FileHandle->new();
  open $F  ,">xxx.rep";
  my $F=$SPOOL;

  print $F "Částka";
}


$ perl test.pl 
Wide character in print at bb.pm line 9.



s pozdravem

--
Ondrej Koala Vacha