my $brs = WWW::Mechanize->new( stack_depth => 0);
$brs->get($url);
$brs->form_name('globe');
$brs->select( 'Registerart' => $regArt);
$brs->select( 'Gegenstand' => {n => 2});
$brs->select( 'matchesperpage' => 100);	
$brs->click_button( name => 'Absenden');