cacert
/
cacert-webdb
9
0
Fork 0
Code Issues Pull Requests 6 Projects Releases 3 Wiki Activity

Migrated to new Translingo

Browse Source
pull/1/head
root 16 years ago
parent ce67044c38
commit a97aeb09e4
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File

10
cacertupload.pl
Unescape Escape View File

@ -22,26 +22,26 @@ use HTTP::Request::Common qw(POST);
$ua->cookie_jar({}); $ua->cookie_jar({});
my $req = POST 'http://www.translingo.org/login.php', my $req = POST 'http://translingo.cacert.org/login.php',
[ [
]; ];
# ggf. Referer faken # ggf. Referer faken
$req->referer('http://www.translingo.org/'); $req->referer('http://translingo.cacert.org/');
$ua->request($req)->as_string; $ua->request($req)->as_string;
# 1.Test - Umgebung # 1.Test - Umgebung
my $req = POST 'http://www.translingo.org/login.php', my $req = POST 'http://translingo.cacert.org/login.php',
[ [
username => 'support@cacert.org', username => 'support@cacert.org',
password => 'ilccSSAMNIemU', password => 'ilccSSAMNIemU',
submit => 'Login', submit => 'Login',
]; ];
# ggf. Referer faken # ggf. Referer faken
$req->referer('http://www.translingo.org/'); $req->referer('http://translingo.cacert.org/');
$ua->request($req)->as_string; $ua->request($req)->as_string;
# 2.Test - FileUpload # 2.Test - FileUpload
my $req = POST 'http://www.translingo.org/upload.php', my $req = POST 'http://translingo.cacert.org/upload.php',
Content_Type => 'form-data', Content_Type => 'form-data',
Content => [ Content => [
project => '1', project => '1',

Write Preview
Loading…
Cancel
Save