You're using DBI right? you need to use placeholders or the quote method.

if you do a search on DBI Placeholders here on perlmonks you can find out how.

or you can just escape the quotes like $var =~ s/'/\\'/g;

 
___crazyinsomniac_______________________________________
Disclaimer: Don't blame. It came from inside the void
perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;"