Help for this page

Select Code to Download


  1. or download this
    my $x = 'st\x{f9}';
$x =~ s/\\x\{([\da-fA-F]{2,4})\}/pack("U",hex($1))/ge;
  2. or download this
    use Encode;

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