🚀 go-pugleaf

Terr!

Säärane takistus mu teel, et ei õnnestu modperl2 all kuidagi UTF8 
normaalselt toimima saada. Testimiseks kasutan sellist skripti:

-------
#!/usr/bin/perl

use strict;
use locale;
use utf8;
binmode stdin, ":utf8";
binmode stdout, ":utf8";

my @alpha = qw(a b c d e f g h i j k l m n o p q r s š z ž t u v õ ä ö ü 
x y);
print "Content-Type: text/plain; charset=UTF-8\n\n";
print "LC_CTYPE: $lc\n";
print "\u$_ " foreach @alpha;
print "\n";
-------

See peaks siis tähestiku tähthaaval suureks keerama ja välja printima. 
Toimib asi kuni V-ni (st et š ja ž on OK), aga siis lähevad täpilised 
koledaks. See skript toimib korralikult käsurealt ja CGI-na, ka on kõik 
korras modperl 1 all (nii PerlRun, PerlRegistry kui handleriks 
kirjutatuna). Paistab, et modperl2 all konveridakse õäöü miskipärast 
ISO8859-x.

Skript (funktsioonaalselt) pole eesmärk omaette, sellega ma lihtsalt 
testin UTFi ja locale toimimist.

On kellelgi kogemust ja ideid?

Taust:
SERVER_SOFTWARE: Apache/2.0.55 (Debian) mod_apreq2-20051231/2.5.7 
mod_perl/2.0.2 Perl/v5.8.8

Juhuks, kui uudisesüsteemis UTF koledaks läeb, on kood ja väljundid siin ka:
http://wanradt.msn.ee/code.html

Tänud ette,

WK