Help for this page
$SheetOut->write(0,0,"ČčŠšŽž"); $SheetOut->write(1,0,encode("cp1250",$Test[0]->{Col1}));