my $sth = $dbh->prepare("... where title regexp ?");
$sth->execute('^\[');