@tags = grep defined, $xml =~ /<!--.*?-->|(<(?>[^"'>]+|'[^']*'|"[^"]*")*>)/sg;