comment on

Sorry, the javascript comes later (after I click that link, I get a javascript table). I cannot find the link, even by viewing the source code then by calling it by name. Here is the code I am using:

my $agent = WWW::Mechanize->new(autocheck=>1, agent=> 'Mozilla/5.0 (Wi
+ndows; U; Windows NT 5.1; en-US; rv:1.8.1.14) Gecko/20080404 Firefox/
+2.0.0.14', requests_redirectable => [ 'GET', 'HEAD', 'POST' ]);
my $response = $agent->get($url2);
$response = $agent->get($url);
my $form = HTML::Form->parse($response->{_content}, $response->base())
+;
$form->param("username", "usrname");
$form->param("password", "pass");
$response = $agent->request($form->click);
$response->{_content} =~ /(https:\/\/\S+)"/
    or die;
$url = $1;
$response = $agent->get($url);
print $response->decoded_content;

$url =  'https://linkfromsite.com'; #Note: This link is in the form of
+ /abc/words/main/ and although it goes to site.com/abc/words/main whe
+n mousing over the link in firefox it shows only the /abc/etc. part
$response = $agent->get($url);
#code fails at this point, response is a website-generated error
#$response = $agent->click("URL");
$response = $agent->reload;
[download]

Please note I am using made up site names since the actual name of the site cannot be disclosed.

In reply to Re^4: Mech and Javascript by jcdento
in thread Mech and Javascript by jcdento

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


Perl-Sensitive Sunglasses
	PerlMonks