Select Code to Download

$seen =~ s/'/''/g;
$interpolated = $seen? "'$seen'" : 'NULL';
$dbh->do("INSERT INTO foo (bar) VALUES ($interpolated)");

my $sth = $dbh->prepare('INSERT INTO foo (bar) VALUES (?)');
$sth->execute($seen);