If I understand your question, you just need to escape your backwhack (with another backwhack.)

$s = 'There is a \ random backwhack in this sentence.';
print "I found it\n" if $s =~ /\\/;
[download]

-sauoq
"My two cents aren't worth a dime.";