$mech->get("http://localhost/TB_ALPHA/upload.php");
sleep 2;
warn "wait";
$mech->field('file', $torrent_file); #input torrent file
warn "wait $torrent_file";
$mech->field('name', $name); #file name
warn "wait $name";
$mech->field('descr', $descr); #description
warn "wait $descr";
$mech->value(3); #category
warn "wait";
$mech->click_button(value => "Do it!"); #Clicks do it
warn "wait";