Beefy Boxes and Bandwidth Generously Provided by pair Networks RobOMonk
There's more than one way to do things
 
PerlMonks  

Re: WWW::Mechanize and Facebook login

by learnperl (Acolyte)
on Dec 11, 2007 at 05:33 UTC ( #656317=note: print w/ replies, xml ) Need Help??


in reply to WWW::Mechanize and Facebook login

I am not that expert on WWW::Mechanize but lately I have been trying do something similar to this, and so far I haven't had much luck with it. But looks to me your issue is JavaScript. If you take closer look at the "loginform" they call a quicklogin() function. WWW::Mechanize doesn't deal with javascript. Search for LWP on cpan and try LWP->agent.

Your problem is right here... (at least the way I think...) <form method="post" name="loginform" action="https://login.facebook.co +m/login.php" onsubmit="quicklogin();">
Thanks
LearnPerl


Comment on Re: WWW::Mechanize and Facebook login
Download Code
Re^2: WWW::Mechanize and Facebook login
by davidov0009 (Scribe) on Dec 13, 2007 at 03:53 UTC
    I have successfully got LWP to login. This seems to work well: (at least the login stuff)

    http://mattdanger.net/code/facebook-status/facebook-status.pl

    Your going to need Crypt::SSLeay installed though.
    use strict; use CGI;
      Hi, I know this is an older thread, but thought it may help others. Here is a sample using Mechanize - you do need the Crypt::SSLeay module installed for it to work.
      use strict; use WWW::Mechanize; use HTTP::Cookies; my $url = "http://www.facebook.com"; my $appurl = "http://apps.facebook.com/inthemafia"; my $username = 'your@email'; my $password = 'yourpass'; my $mech = WWW::Mechanize->new(); $mech->cookie_jar(HTTP::Cookies->new()); $mech->get($url); $mech->form_name('menubar_login'); $mech->field(email => $username); $mech->field(pass => $password); $mech->click(); my $facebook_content = $mech->content(); # go to an app url $mech->get($appurl); my $app_content = $mech->content(); print "$app_content\n";
        I wrote something very similar to this, but it seems fb has changed how they let people login.. any updates?

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (8)
As of 2014-04-17 08:15 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (441 votes), past polls