$curlargs  = "PassPhrase=$pp";
$curlargs .= "&AccountID=$accountfrom";
$sysstring = "curl -s -d ";
$sysstring .= '"';
$sysstring .= $curlargs;
$sysstring .= '"';
$sysstring .= " https://www.e-gold.com/acct/balance.asp";
# read everything into one buffer
undef $/;
open(curls, "$sysstring|");
while(<curls>){$return = $_} 
close curls;

print "Content-Type: text/html\n\n";
print "$return";