I even tried taking out the other -> in the code:

print qq~
\$root->{PayoneerResponse}{Echo}{Status}{value}='~, $root->{PayoneerRe
+sponse}{Echo}{Status}{value} ,qq~';
\$root->{Status}{value}='~, $root->{Status}{value}, qq~';
~;
[download]

which prints this result:
$root->{PayoneerResponse}{Echo}{Status}{value}='';
$root->{Status}{value}='';

Still does not work.

Richard