$sth_suchen->execute 
      or die "Error: couldn't execute $statement_suchen: $DBI::errstr\n";