Select Code to Download

#!/usr/bin/perl
use XML::Simple;
use Data::Dumper;
...

print "data: ".$data->{'tag'}."\n";
print Dumper $data;

input:
<?xml version="1.0" encoding="UTF-8" ?>
<tag>û</tag>
...
$VAR1 = {
          'tag' => "\x{fb}"
        };