my $mech = WWW::Mechanize->new();
$mech->get('http://www.warez-bb.org/login.php');