|
filldb.pl |
my $tuple = join(", ", ("?") x $rows); my $st = $db->prepare("insert into $table values ($tuple)"); while(<>) { chomp; if ($strip_comments) { next if /^\s*#/; next if /^\s*$/; } my @tuple = split /$delim/; $st->execute(@tuple); } $db->disconnect; |
Mit dem x-Operator können Listen oder Zeichenketten
vervielfältigt werden. $tuple enthält somit genau
soviel Platzhalter, wie über $rows angegeben worden sind.
|
Copyright © 1996, 1998, 1999, 2000 Andreas Borchert, in HTML konvertiert am 07.02.2000 |