$dbh->do("INSERT INTO body (Body) Values ('Here''s a quote')");
my $rows = $dbh->selectall_arrayref("select * from body b where b.Body like '%''%'");