$agent->get($url);
$agent->form_number(1);
$agent->field('vl(freeText0)', $suchwort);
$agent->click();
$agent->content =~ m/\'\/goto\/(.*)\'/;
print "Der Link: $1\n\n";
$agent->get( $1);