[REBOL] Re: How to properly parse HTML and XHTML Meta Tags
From: christian:ensel:gmx at: 12-Sep-2008 19:32
The source should have been right there below the signature.
Anyway, I'll cite it again (and it's definitely REBOL ;-)
-----
parse-metatags: func [page [url!] /local title keywords description] [
page: read http://www.rebol.com
parse page [thru <title> copy title to </title>]
parse/all page [thru {<meta name="keywords" content="} copy keywords
to {"}]
parse/all page [thru {<meta name="description" content="} copy
description to {"}]
foreach keyword keywords: parse/all any [keywords ""] "," [trim keyword]
reduce [
'title title
'keywords keywords
'description description
]
]
-----
Beware of unintentional line breaks in the code above due to e-mail
transportation.
HTH,
Christian
vonja-sbcglobal.net schrieb:
