Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery

Re^2: WWW::Mechanize::Firefox popup window help

by mmittiga17 (Scribe)
on May 16, 2012 at 15:09 UTC ( #970855=note: print w/replies, xml ) Need Help??

in reply to Re: WWW::Mechanize::Firefox popup window help
in thread WWW::Mechanize::Firefox popup window help

Thank you for your time and information. Working on this now.

  • Comment on Re^2: WWW::Mechanize::Firefox popup window help

Replies are listed 'Best First'.
Re^3: WWW::Mechanize::Firefox popup window help
by bbrown25 (Initiate) on May 08, 2014 at 19:11 UTC

    I'm having a similar problem that synchronize doesn't seem to solve. I'm trying to automate filling out some forms that get auto-populated by a popup. The popup fires off a js to autofill the previous form. If I use the popup as it's own URL i can access the "form1" just fine (but then it won't autofill the previous page with the js), but when I actually try to navigate using the below code, it can't find "form1".

    Any ideas?

    if($visitFound eq 0){ $oa_mech->get($addv_url); die unless ($oa_mech->success); sleep(2); #get patient ID $oa_mech->click({id => 'ctl00_phFolderContent_Button1', synchr +onize => 0}); for (1..10){ last if $oa_mech->is_visible( xpath => '//*[@id="ctl04_pop +upBase_btnSearch"]'); sleep(1); } $oa_form_name = "form1"; $oa_mech->form_name($oa_form_name); $oa_mech->set_fields( '#ctl04_popupBase_txtSearch' => 'Hester', '#ctl04_popupBase_DOB_Month' => $birthMonth, '#ctl04_popupBase_DOB_Day' => $birthDay, '#ctl04_popupBase_DOB_Year' => $birthYear, ); $oa_mech->click({id => 'ctl04_popupBase_btnSearch', synchroniz +e => 0}); for (1..10){ #wait for visit page to reload last if $oa_mech->is_visible( xpath => '//*[@id="ctl00_phF +olderContent_DateVisited_Year"]'); sleep(1); } }

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (6)
As of 2023-02-01 15:45 GMT
Find Nodes?
    Voting Booth?
    I prefer not to run the latest version of Perl because:

    Results (10 votes). Check out past polls.