Help for this page

Select Code to Download

Select or download this

if ($mytarget =~ m/($mystring)/i)
     {       
         print "It matches $1\n";   
     }