diff options
author | Gianni Ceccarelli <gianni.ceccarelli@net-a-porter.com> | 2013-11-21 09:50:41 +0000 |
---|---|---|
committer | Gianni Ceccarelli <gianni.ceccarelli@net-a-porter.com> | 2013-11-21 09:50:41 +0000 |
commit | 19c7543ef4bdcc4f19e4cf10d55ffe86344f91c3 (patch) | |
tree | 36ede2d9ad770fca6d457fd68fa790b6c36f0abb | |
parent | new URL after login (diff) | |
download | oyster-19c7543ef4bdcc4f19e4cf10d55ffe86344f91c3.tar.gz oyster-19c7543ef4bdcc4f19e4cf10d55ffe86344f91c3.tar.bz2 oyster-19c7543ef4bdcc4f19e4cf10d55ffe86344f91c3.zip |
fixes for newer website layout
-rw-r--r-- | oyster | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -82,7 +82,7 @@ if ($opt->username or $opt->password) { $username,$password); } -my $mech = WWW::Mechanize->new; +my $mech = WWW::Mechanize->new(ssl_opts=>{verify_hostname=>0}); WWW::Mechanize::TreeBuilder->meta->apply( $mech, tree_class => 'HTML::TreeBuilder::XPath', @@ -90,12 +90,12 @@ WWW::Mechanize::TreeBuilder->meta->apply( $mech->agent_alias('Linux Mozilla'); progress('logging in'); -$mech->get('https://oyster.tfl.gov.uk/oyster/entry.do'); +$mech->get('https://account.tfl.gov.uk/oyster/login'); $mech->submit_form( form_name => 'sign-in', fields => { - j_username => $username, - j_password => $password, + UserName => $username, + Password => $password, }, ); |