use Encode;

my $x = 'st\x{f9}';
my $iso = eval '"'.$x.'"';
$x = Encode::decode('iso-8859-1', $iso);