c:\@Work\Perl\monks>perl -wMstrict -le
"my $like = q{REGEXP_LIKE(note_tx, 'CA\s+\n?Merged\s+\n?From:\s+\n?Vendor:')};
 print qq{:$like:};
"
:REGEXP_LIKE(note_tx, 'CA\s+\n?Merged\s+\n?From:\s+\n?Vendor:'):