Re^2: Perl Script to login to a secure WebSite
by Anonymous Monk on Apr 22, 2013 at 06:25 UTC
|
Hi,
I have used this script, its working fine. But I have one doubt that If particular System is slow in that case also this will work? or we need to do any changes in script. Please reply. Thanks | [reply] [Watch: Dir/Any] |
|
can u please share u script in the reply.. because the above is not working properly
| [reply] [Watch: Dir/Any] |
|
| [reply] [Watch: Dir/Any] |
|
In what way is the script failing for you? "Not working properly" is not a good error description we can work with.
Please copy and paste the exact error message you get.
Maybe the website changed the field names or uses a different flow nowadays.
| [reply] [Watch: Dir/Any] |
Re^2: Perl Script to login to a secure WebSite
by Anonymous Monk on Aug 06, 2012 at 01:24 UTC
|
Hi, Many thanks for your help, now I am able to login to Gmail and my another secure website, on which again I was using wrong Form details...
Much appreciate your help on this :)
Now I am trying to go the link which I get after login.. Plz let me know if follow_link(text => 'string') will work on this or do I need to use any other function...
| [reply] [Watch: Dir/Any] |
|
| [reply] [Watch: Dir/Any] |
|
Hi,
After logging to the website, I am able to go the one more link in the next page.
Now I have to select the checkbox which enables few buttons (after selecting the checkbox).
Once button is enabled I need to click one of the button, which opens one form, I need to select one value from the drop down and submit.
Once this completes then I am done with all my steps..
Please suggest on this, here that site uses internally Java Script..
I tried to seclect checkbox, then button and then submit.. Script runs fine without any error but action is not performing... :(
Plz correct me if any wrong in the code..
$mech->tick( 'D:_ctl2:_ctl0', 'on');
#$mech->tick( "D:_ctl2:_ctl0" );
print $mech->success();
$mech->current_form()->find_input(undef, 'Assign');
print $mech->success();
$mech->field('K', 'Name1');
print $mech->success();
$mech->current_form()->find_input(undef, 'Update');
print $mech->success();
| [reply] [Watch: Dir/Any] [d/l] |
|
use strict;
use warnings;
use strict;
use WWW::Mechanize;
use HTTP::Cookies;
my $outfile = "out2.htm";
my $url = "https://accounts.google.com/ServiceLogin?service=mail&passi
+ve=true&rm=false&continue=http://mail.google.com/mail/&scc=1<mpl=de
+fault<mplcache=2";
my $username = 'yourgmailid';
my $password = 'yourpasswrd';
my $mech = WWW::Mechanize->new();
$mech->cookie_jar(HTTP::Cookies->new());
$mech->get($url);
$mech->form_id('gaia_loginform');
$mech->field("Email", $username);
$mech->field("Passwd", $password);
$mech->click;
my $output_page = $mech->content();
print $output_page;
open(OUTFILE, ">$outfile");
binmode(OUTFILE, ":utf8");
print OUTFILE "$output_page";
close(OUTFILE);
-----------------------------------------------------------
Very thanks for the above script.
After once logged in to the gmail I would like display output like "Log in successful", if log in fails I would like to display "Log in fail";
Please help me on the above condition.
Thanks, you
Jineesh.K
| [reply] [Watch: Dir/Any] [d/l] |
|
The code is executing well but the output which we are getting is in the html format , cannot we get the output in the gui , so that if at all we run the script the gmail account of ours will be automatically logged in,,??
| [reply] [Watch: Dir/Any] |
|
|
|
Re^2: Perl Script to login to a secure WebSite
by Panigrahi (Initiate) on Dec 30, 2013 at 12:39 UTC
|
Hi,
I want to export/download the containt/data through CSV file from a https: site.
Can you please suggest me a script and also suggest me how to run it, as I am a biginer for perl. | [reply] [Watch: Dir/Any] |
|
| [reply] [Watch: Dir/Any] |
Re^2: Perl Script to login to a secure WebSite
by Anonymous Monk on Sep 16, 2016 at 11:15 UTC
|
when i am executing the above code, i am getting a error generated as : Can't locate WWW/Mechanize.pm in @INC (@INC contains: /usr/local/lib64/perl5 /us /perl5 /usr/share/perl5 .) at login.pl line 4.
BEGIN failed--compilation aborted at login.pl line 4.
can u pls resolve the issue asap.. | [reply] [Watch: Dir/Any] |
|
cpan WWW::Mechanize
Update: See also Tutorials->Installing Modules. | [reply] [Watch: Dir/Any] [d/l] |
A reply falls below the community's threshold of quality. You may see it by logging in.
|