my $sth = $dbh->prepare(q[INSERT INTO foo (bar) VALUES(?)];
$sth->execute($bar);