On Thursday, April 5, 2012 4:21:44 AM UTC-7, Gary Stainburn wrote: > Hi folks. > > Returning to Perl on Win32 for the first time in ages. Installed Strawberry > Perl and WWW::Selenium. However, when I run the example in the CPAN help > page, it hangs because the $sel->click doesn't work. > > If I manually click on the button the rest of the script works fine. > > Anyone got any ideas why and what I need to do to fix it? > Alternatively, does anyone have experience of installing WWW::Selenium on a > Linux box and using it to control a Windows machine? > > Example Script > > use WWW::Selenium; > > my $sel = WWW::Selenium->new( host => "localhost", > port => 4444, > browser => "*iexplore", > browser_url => "http://www.google.com", > ); > > $sel->start; > $sel->open("http://www.google.com"); > $sel->type("q", "hello world"); > $sel->click("btnG"); > $sel->wait_for_page_to_load(5000); > print $sel->get_title; > $sel->stop;
On Thursday, April 5, 2012 4:21:44 AM UTC-7, Gary Stainburn wrote: > Hi folks. > > Returning to Perl on Win32 for the first time in ages. Installed Strawberry > Perl and WWW::Selenium. However, when I run the example in the CPAN help > page, it hangs because the $sel->click doesn't work. > > If I manually click on the button the rest of the script works fine. > > Anyone got any ideas why and what I need to do to fix it? > Alternatively, does anyone have experience of installing WWW::Selenium on a > Linux box and using it to control a Windows machine? > > Example Script > > use WWW::Selenium; > > my $sel = WWW::Selenium->new( host => "localhost", > port => 4444, > browser => "*iexplore", > browser_url => "http://www.google.com", > ); > > $sel->start; > $sel->open("http://www.google.com"); > $sel->type("q", "hello world"); > $sel->click("btnG"); > $sel->wait_for_page_to_load(5000); > print $sel->get_title; > $sel->stop; Have you had an opportunity to look over some of the newer/more recent selenium functionality? http://search.cpan.org/~aivaturi/Selenium-Remote-Driver-0.15/ http://seleniumhq.org/docs/03_webdriver.html -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/