use Convert::Cyrillic; $src = 'koi8'; $dst = 'win'; $SrcBuf = 'text in koi8 here'; $DstBuf = Convert::Cyrillic::cstocs ($Src, $Dst, $SrcBuf);
Where $Src and $Dst are one of:
KOI8 - for KOI8-R WIN - for WIN-1251 DOS - for DOS, alternative, CP-866 MAC - for Macintosh ISO - for ISO-8859-5 UTF-8 - for UTF-8 (Unicode) VOL - for Volapuk (transliteration)
Buffer may contain line breaks, which are preserved.
Copyright (c) 1997-98, John Neystadt <http://www.neystadt.org/john/> You may install this script on your web site for free. To obtain permision for redistribution or any other usage contact email@example.com.
Drop me a line if you deploy this script on your site.