Help for this page
my $main_re = qr/[^&#?(\w{2,7});|\\xeb|\\x(\w{2})|\\\\x(\w{2})|\\(\w{2 +,7})|\\'|\\\'|\'|\\"|\\"|\\"|\\\\|\w{5}|a-z|<(.*)>|<\/?.*>]/