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(<form action="#"><table>\n);
my $i=0;
while ( my ($idSensoren, $Beschreibung) = $select->fetchrow_array() )
{
  print qq(
  <tr>
    <td>Beschreibung</td>
    <!-- Tabellenwert zur Verdeutlichung über mehrere Zeilen gestreckt -->
    <td><input type="text" size="10" 
        name="beschreibung$i" 
        value="$beschreibungwerte{"beschreibung$i"}"
        ></td>
    <td><input type="submit" name="werteuebernehmen"></td>
  </tr>
  );
  $i++;
}
print qq(</table></form>\n);