if($string=~ m/<\/section>/) { print "Here :: $& \n"; } else { print "regex failed"; } [download]
In reply to Re^3: Regex help reqd by Anonymous Monk in thread Regex help reqd by Ananda