Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re: Re: Re: Javascript in Perl and retrieving the HTML source.

by bunnyman (Hermit)
on Sep 23, 2003 at 15:01 UTC ( [id://293517]=note: print w/replies, xml ) Need Help??


in reply to Re: Re: Javascript in Perl and retrieving the HTML source.
in thread Javascript in Perl and retrieving the HTML source.

I have not used the Javascript module before, so I am not sure how it works. Check out jeffa's reply at 293164. I agree with jeffa that the table is not being generated with Javascript, so I don't see why you can't just download the page and parse the HTML. The only Javascript code on that page is only there to manipulate the images on the page, and I am not even sure that it does anything at all (it looks like MacroMedia Dreamweaver puts MM_ functions into everything it makes.)

Replies are listed 'Best First'.
Re: Re: Re: Re: Javascript in Perl and retrieving the HTML source.
by waiterm (Acolyte) on Sep 24, 2003 at 22:39 UTC
    I've managed to fix the problem with the following code:
    sub get { $date_ = $mm." ".$year; my $SendObject=Win32::OLE->new('microsoft.XMLhttp'); $SendObject->open("GET", "http://212.53.74.34/pages6068/availabili +ty2.cfm?propref=".$RRETid."&date_month=".$mon."&date_year=".$year."", + "false"); $SendObject->setRequestHeader("Content-type", "text/plain"); $SendObject->send(); my $response_ = $SendObject->responseText; $response_ =~ s/\s/ /g; @dat = split(/$date_/,$response_); $response_ = $dat[1]; @dat = split(/<\/Table>/i,$response_); $response_ = $dat[0]; open(LOG,">C:/tmp/RRET/RREThtml.txt"); print LOG $response_; close + LOG; }
    however, I can't now call $response_ in the main program... do I have to set it as a global variable...if so, how??

      Just return it from the sub.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://293517]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (4)
As of 2024-03-29 01:35 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found