Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: DBD-SQLite Regexp

by snoopy (Curate)
on Nov 26, 2012 at 20:07 UTC ( #1005756=note: print w/replies, xml ) Need Help??

in reply to DBD-SQLite Regexp

Another option is to use the PCRE (Perl Compatable Regular Expressions) loadable module for SQLite for familar pattern matching via the REGEXP function.
#!/usr/bin/perl use warnings; use strict; use 5.10.1; use DBI; my $dbh = DBI->connect("dbi:SQLite:dbname=/tmp/text.db", "", "", {Rais +eError => 1}); # so we can use SQLite REGEXP operator $dbh->sqlite_enable_load_extension(my $_enabled = 1); $dbh->prepare("SELECT load_extension('/usr/lib/sqlite3/')"); my $word = 'tag'; my $word_re = '\b'.quotemeta($word).'\b'; my $results = $dbh->selectall_arrayref("SELECT ID, sentence FROM tex +ts WHERE sentence REGEXP ?", {}, $word_re); foreach my $result (@$results) { my ($id, $sentence) = @$result; say "matched $id: $sentence"; }
Depending on your system it may be available as a package (Ubuntu has sqlite3-pcre).

It's also available from github where you can build and install it yourself.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1005756]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (4)
As of 2022-05-18 12:03 GMT
Find Nodes?
    Voting Booth?
    Do you prefer to work remotely?

    Results (70 votes). Check out past polls.