1 wrz 2008

Konwersja ISO ANSI

sub ISO_ANSI {
# Conversion of polish characters: ISO Latin2 (8859-2) -> ANSI (Win-1250)
my ( $tekst ) = @_;
  $tekst =~ tr/ˇĆĘŁŃÓ¦¬Ż±ćęłń󶼿/ĄĆĘŁŃÓŚŹŻąćęłńóśźż/;
  return $tekst;
}
$linia = &ISO_ANSI($linia);

Finkcja do konwersja ISO ANSI