Pascal Gloor vor 6 Jahren
Ursprung
Commit
5c370636de
1 geänderte Dateien mit 1 neuen und 1 gelöschten Zeilen
  1. 1
    1
      bin/autodoc_process.pl

+ 1
- 1
bin/autodoc_process.pl Datei anzeigen

print "$word "; print "$word ";
my $q = sqlquery($dbh, "SELECT lang FROM dict WHERE word like ?", $word); my $q = sqlquery($dbh, "SELECT lang FROM dict WHERE word like ?", $word);
while(my ($l) = $q->fetchrow_array()) { while(my ($l) = $q->fetchrow_array()) {
print "$lang ";
print "$l ";
$lang = $l; $lang = $l;
} }
print "\n"; print "\n";

Laden…
Abbrechen
Speichern