|< 1 2 >| | 15 Einträge, 2 Seiten |
1
2
3
4
5
6
7
my $sql = "INSERT INTO table (val1, val2, val3) VALUES (?,?,?)";
my $sth = $dbh->prepare($sql) or die "Error: $DBI::errstr";
foreach my $line (@data) {
$sth->execute(@$line)
or die "Error in execute: @$line: $DBI::errstr\n";
} # foreach
$sth->finish();
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
sub insertINTO()
{
##Verbindung herstellen
my $tabelle = "urls";
my $dbh = DBI->connect("DBI:mysql:$db:$host",$user,$pwd);
my $sql = shift || "";
my $query = $dbh->prepare($sql);
#Query ausführen
$query->execute;
$query->finish();
$dbh->disconnect();
}
|< 1 2 >| | 15 Einträge, 2 Seiten |