Estoy tratando de usar Perl WWW::Mechanize para iniciar sesión en mi banco y extraer la información de la transacción. Después de iniciar sesión a través de un navegador en mi banco (Wells Fargo), muestra brevemente una página web temporal que dice algo como "espere mientras verificamos su identidad". Después de unos segundos, procede a la página web del banco, donde puedo obtener mis datos bancarios. La única diferencia es que la URL contiene varios parámetros más "GET" agregados a la URL de la página temporal, que solo tenía un parámetro de ID de sesión.¿Cómo puedo obtener WWW-Mechanize para iniciar sesión en el sitio web de Wells Fargo?
Pude conseguir con éxito WWW :: Mechanize para iniciar sesión desde la página de inicio de sesión, pero se queda atascado en la página temporal. Hay una etiqueta <meta http-equiv="Refresh"
... en el encabezado, así que probé $mech->follow_meta_redirect
pero tampoco me pasó esa página temporal.
Cualquier ayuda para superar esto sería apreciada. Gracias por adelantado.
Aquí está el código de barebones que me consigue atrapado en la página temporal:
#!/usr/bin/perl -w
use strict;
use WWW::Mechanize;
my $mech = WWW::Mechanize->new();
$mech->agent_alias('Linux Mozilla');
$mech->get("https://www.wellsfargo.com");
$mech->submit_form(
form_number => 2,
fields => {
userid => "$userid",
password => "$password"
},
button => "btnSignon"
);
Gracias por el puntero a Firebug. Lo instalé y noté que hay una línea '
' en la página intermedia que se refiere a una función javascript. Supongo que no tengo suerte ya que Mech no puede lidiar con javascript en este momento. –Puede que no tenga mala suerte, solo necesita averiguar qué están haciendo esas funciones de Javascript y hacer que Mech haga lo mismo. Use Firebug para ver la transacción HTTP. ¿Hay algún campo POST o cookies que no haya visto antes? El JS probablemente los haya agregado, así que agrega las mismas cosas con Mech. – friedo