#...xml initi...
my $sendername = $XMLRead->{'MSR-ISSUE'}{'SHORT-NAME'};
$sendername = $sendername . " Test";
my $encoded_string  = encode("cp1250", $sendername);
print $encoded_string;