Mega Code Archive

 

Categories / Perl / Database

 

Using Multiple Placeholders

use DBI; my $dbh=DBI->connect("DBI:mysql:host=localhost;user=root;password=;database=sample_db"); my $sth=$dbh->prepare("INSERT INTO employee(name)VALUES(?)"); my $name="Tom";  # set values here $sth->execute($name); $sth=$dbh->prepare("SELECT * FROM employee"); $sth->execute(); while(my @val = $sth->fetchrow_array()){     print "name=$val[0]\n"; } $sth->finish(); $dbh->disconnect();