http://qs321.pair.com?node_id=358294

$email_content =~ s/.*?\[:start\]//; if ($email_content =~ m/\[\:start\]/) { print "found it"; exit; }