$test = q/RunSql "delete sometable where strike like '%[A-Za-z]%'"/; $test =~ s/'/''/g; $sql = "update job set cmd='$test' where jobname='somejob'";