chopping off last word in a sentance: perl

$cn=~ s/\s*\b\Q$word\E\b(?!.*\b\Q$word\E\b)//s; will do

sqlite multiple statements in a single query

Using sqlite, for inserting in specific columns it is insert into 'test1' () select ('') as '' union select ('') union select ('');