use Encode qw(from_to);
from_to($string, "utf8", "cp1250");