$ cat http_traffic
$agent->get('http://search.cpan.org/');
$agent->form_name('f');
$agent->field('query', 'shoes my clown');
$agent->field('mode', 'all');
$agent->click();