summaryrefslogtreecommitdiffstats
path: root/bin/archweb-login.pl
diff options
context:
space:
mode:
Diffstat (limited to 'bin/archweb-login.pl')
-rwxr-xr-xbin/archweb-login.pl24
1 files changed, 0 insertions, 24 deletions
diff --git a/bin/archweb-login.pl b/bin/archweb-login.pl
deleted file mode 100755
index d66ecff..0000000
--- a/bin/archweb-login.pl
+++ /dev/null
@@ -1,24 +0,0 @@
-#!/usr/bin/perl
-
-use warnings;
-use strict;
-
-use File::Basename;
-use Config::Tiny;
-use WWW::Mechanize;
-use HTTP::Cookies;
-
-my $Config = Config::Tiny->new();
-$Config = Config::Tiny->read(dirname($0) . "/../settings.conf");
-
-my $cookie_jar = HTTP::Cookies->new(file => dirname($0) . "/../cookie_jar", autosave => 1);
-my $mech = WWW::Mechanize->new(agent => "arch-mirror-tools", cookie_jar => $cookie_jar);
-
-$mech->get("https://www.archlinux.org/login/");
-my $res = $mech->submit_form(
- form_id => "dev-login-form",
- fields => {
- username => $Config->{account}->{username},
- password => $Config->{account}->{password}
- }
-);