http://qs321.pair.com?node_id=487998


in reply to Reaped: $20 For Coding Help

Greetings copland,

Its been a very long time since I've had to do anything with PHP, and I think I had a wee bit too much wine tonight with dinner; however, here's my first (untested) pass:

use LWP::UserAgent; my $ua = LWP::UserAgent->new; my $page = $ua->get( 'https://www.paytox.com/?cmd=retrieve_trans' . '&user_id=<USERID>&xipn=<XPIN>&xhash=<XHASH>&trans_id=<TRANSID>' ); die "HTTP resquest not successful; $!" unless ($page->is_success); my $trans = split(',', (split("\n", $page->content)[-1]);

If this works, keep your $20. I don't post here for money. (I do it for the XP... Just kidding.)

gryphon
Whitepages.com Development Manager (DSMS)
code('Perl') || die;