@tokens = split /<!--.*?-->|(<(?>[^"'>]+|'[^']*'|"[^"]*")*>)/s, $xml;