|
Aggregator
I ran across this post on RSS aggregators in Scheme and Haskell and thought one in Io might make an interesting comparison.
SGML // for xml parsing
URL
"""
<?xml version="1.0" encoding="ISO-8859-1" ?>
<rss version="2.0">
<channel>
<title>...</title>
<link>...</link>
<description>...</description>
<language>en-us</language>
#{File with("feedurls") readLines map(asURL fetch asXML elementsWithName("item") map(asString)) flatten join}
</channel>
</rss>
""" interpolate println
Scheme version
Haskell version
|