in reply to return metaTag Info
# Warning: These are _crappy_ regexes and I haven't run this ($description) = $document =~ /<meta\s+name=['"]description['"]content['"]([^'"]+)['"]/; ($posted) = $document =~ /<meta\s+name=['"]posted['"]\s+content['"]([^'"]+)['"]/; print "$description, $posted\n";
But much, much better is HTML::HeadParser. I think it does exactly what you're after (actually - it does exactly what I think you're after :) It's a lightweight HTML parser that just does the head of a document.
I'm not sure what what your %triplets is for - have you already extracted the data and simply want to test for its presence?
|
|---|