$_xmlCode = q~<?xml version="1.0" encoding="UTF-8"?><PayoneerToken><Token>https://sandbox.payoneer.com/partners/lp.aspx?token=akn2w3knsnk323lnknasdin4falkngnaskjncik32l12</Token></PayoneerToken>
~;
$ob = new XML::Bare( text => "$_xmlCode" );
$root = $ob->parse();
$_redirectUrl = $root->{PayoneerToken}{Token}{Value};
# Print to browser to see if it is working...
print "Content-type: text/html\n\n";
print qq~
\$_redirectUrl = '$_redirectUrl';<br>
<br>
<b>\$_xmlCode='$_xmlCode'</b>;<br>~;