Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:
Any idea what I'm missing? I've eliminated the call to my function after initilization and tried to bring it down to the basics but can't seem to retrieve the javascript value.use warnings; use strict; use LWP::UserAgent; use HTML::Parser; use JavaScript::SpiderMonkey; use Data::Dumper; my $base = 'http://www.myspace.com'; my $js = JavaScript::SpiderMonkey->new(); $js->init(); $js->function_set("SMSTokenValue", sub { print "@_\n"; }); $js->property_by_path("document.getElementById"); { my $ua = new LWP::UserAgent(); my $req = new HTTP::Request ('GET', $base); my $res = $ua->request($req); if (!($res->is_success)){ warn "Warning:".$res->message."\n"; } else { print "Successful\n"; my $rc = $js->eval("document.getElementById('ctl00_ctl00_cpMai +n_cpMain_LoginBox_SMSVerifiedCookieToken');"); print Dumper($rc); $js->destroy(); } }
Any help would be greatly appreciated
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: SpiderMonkey and JS
by spx2 (Deacon) on May 01, 2009 at 15:40 UTC | |
by Anonymous Monk on May 01, 2009 at 19:32 UTC | |
by spx2 (Deacon) on May 01, 2009 at 22:37 UTC | |
|
Re: SpiderMonkey and JS
by Crackers2 (Parson) on May 01, 2009 at 14:35 UTC |