#!/usr/bin/perl -w 
use strict; 
my $page_contents = "Please note that Mrs. Michelle E. (Brown) Smith passed away (along side her thirteen black cats) last Saturday. Continuing paragraphs, etc."; 
my $page_title = "Mrs. Michelle E. (Brown) Smith"; 
 
	if ($page_contents =~ /$page_title/) 
	{ 
		print "Eek, bad luck!\n"; 
	}else{ 
		print "No match\n"; 
	}

my $page_title = "Mrs. Michelle E. \(Brown\) Smith";