Revision 9e89e92f
Von Moritz Bunkus vor fast 18 Jahren hinzugefügt
SL/AM.pm | ||
---|---|---|
1166 | 1166 |
$sth = $dbh->prepare($query); |
1167 | 1167 |
$sth->execute || $form->dberror($query); |
1168 | 1168 |
|
1169 |
$form->{"ALL"} = []; |
|
1169 | 1170 |
while (my $ref = $sth->fetchrow_hashref(NAME_lc)) { |
1170 | 1171 |
push @{ $form->{ALL} }, $ref; |
1171 | 1172 |
} |
Auch abrufbar als: Unified diff
Arrays in $form initialisieren, bevor sie benutzt werden.