use Encode;

...
# assuming $data is a scalar containing a utf8 string:
$data = encode( "cp1250", $data );

# now it contains a cp1250 string
# (utf8 flag is off, and characters are single-byte)