All pastes #742527 Raw Edit

Stuff

public text v1 · immutable
·published 2007-10-19 16:18 UTC
rendered paste body
#!/usr/bin/perl

use WWW::Mechanize;
use HTTP::Cookies;

$baseurl = "https://blinblin.net/blabla/default_ssl.asp";
$mech = WWW::Mechanize->new();
$mech->get( $baseurl );


$mech->field(formfield1 => 'info1');
$mech->field(formfield2 => 'newinfo');
$mech->click();