Parent Directory | Revision Log | Patch
revision 1.4 by dpavlin, Thu Apr 24 17:25:44 2003 UTC | revision 1.5 by dpavlin, Thu Apr 24 17:55:17 2003 UTC | |
---|---|---|
# | Line 9 | Line 9 |
9 | use strict; | use strict; |
10 | ||
11 | use XML::Parser; | use XML::Parser; |
12 | use Text::Iconv; | use common; |
# output charset | ||
my $charset='ISO-8859-2'; | ||
Text::Iconv->raise_error(0); # Conversion errors raise exceptions | ||
my $from_utf8 = Text::Iconv->new('UTF8', $charset); | ||
sub x { | ||
return $from_utf8->convert($_[0]); | ||
} | ||
13 | ||
14 | $|=1; | $|=1; |
15 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |