xpaths <- c("//meta[@name='viewport']/@content",
"//meta[@charset]/@charset",
"//link[@rel='canonical']/@href",
"//link[@rel='alternate']/@href",
"//link[@rel='alternate']/@hreflang",
"//meta[starts-with(@property, 'og:')]/@property",
"//meta[starts-with(@property, 'og:')]/@content",
"//meta[starts-with(@name, 'twitter:')]/@name",
"//meta[starts-with(@name, 'twitter:')]/@content",
"//script[contains(@src, 'googletagmanager.com/gtm.js?id=')]/@src",
"//iframe[contains(@src, 'googletagmanager.com/ns.html?id=')]/@src",
"//link[@rel='stylesheet']/@href",
"//link[contains(@href, '.css')]/@href",
"//script[@type='text/javascript']/@src",
"//script[@type='text/javascript']/text()",
"name(//link[@rel='canonical']/..)")