my $sth = $dbh->prepare("insert into foo SET source=?, name=?, date=?, status=?");
$sth->execute('file', 'Ben marcata', '2001-05-04', '') or die $dbh->errstr;