my %beschreibungwerte = map { $_ => $cgi->param($_)//'' } # mach daraus einen Hashwert (notfalls mit "" besetzeten falls undefiniert) grep { /^beschreibung\d+/} # hole alle CGI-Parameter deren Namen mit beschreibung beginnt $cgi->param; # Namen aller CGI-Parameter print qq(
\n);