Jemand zu Hause?![[twitter]](/battie/theme/default/icons/twitter.gif){kind=icon}
Leser: 22
+6 replies1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
#!/usr/bin/perl
use strict;
use warnings;
use WWW::Mechanize;
my $email = 'Sample';
my $password = 'Sample';
my @fields = ("email" , "password");
my $browser = WWW::Mechanize->new(
stack_depth => 0,
autocheck => 1,
);
$browser->agent_alias( 'Windows IE 6');
$browser->get("http://schülercc.de/");
$browser->submit_form(
fields => {
email => $email,
passwort => $password,
login => 'button_login_login' }
);
print "you are logged in";
+5 replies
+3 replies1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
#!/usr/bin/perl
use strict;
use warnings;
use WWW::Mechanize;
use HTML::FORM;
my $email = 'Sample';
my $password = 'Sample';
my @fields = ("email" , "password");
my $browser = WWW::Mechanize->new(
stack_depth => 0,
autocheck => 1,
);
$browser->agent_alias( 'Windows IE 6');
$browser->get("http://schülercc.de/");
$browser->submit_form(
fields => {email => $email,passwort => $password},
button => 'button_login_login'
);
print $browser->content;
+2 replies
1 2 3 4 5
$browser->submit_form( form_number => 3, fields => {email => $email,passwort => $password}, button => 'button_login_login' );
Schrift
use strict; use warnings;
Blog
Einstellungen![[feed]](/battie/theme/default/icons/feed.png){kind=icon}
![[Powered by Battie]](/battie/img/powered.png)
