#!/bin/rc touch /tmp/rss.new mv /tmp/rss.new /tmp/rss.old { hget http://hitchensblog.mailonsunday.co.uk/rss.xml hget 'http://electro-music.com/forum/rss.php?f=112' hget http://will-self.com/feed/ hget 'http://www.roughtype.com/?feed=rss2' hget https://orib.dev/rss.xml hget https://ftrv.se/posts.rss hget https://wiki.xxiivv.com/links/rss.xml hget http://n-gate.com/index.rss hget 'https://www.youtube.com/feeds/videos.xml?user=havic5' hget 'https://www.youtube.com/feeds/videos.xml?user=chessnetwork' hget 'https://www.youtube.com/feeds/videos.xml?user=JordanPetersonVideos' hget 'https://www.youtube.com/feeds/videos.xml?user=WyseGuyAces' # 8bitmusictheory hget 'https://www.youtube.com/feeds/videos.xml?channel_id=UCeZLO2VgbZHeDcongKzzfOw' # Noches Insomnio hget 'https://www.youtube.com/feeds/videos.xml?channel_id=UCkBUIboDRnL-6WF1dZ0-ZIg' # My Little Thought Tree hget 'https://www.youtube.com/feeds/videos.xml?channel_id=UCYtu3JxrpI1XjNn-B_HqW4Q' } | awk ' BEGIN{RS = "<"} sub(/^(published|media:title|link|pubDate)>/, ""){print "

"$0"

"} /^(item|entry)>/{print "
"} /^media:thumbnail/{sub(".*url=\"", ""); sub("\".*", ""); print "

"$0"

"} sub(/^id>yt:video:/, ""){print "

http://www.youtube.com/watch?v="$0"

"} sub(/^media:description>/, ""){print "
"$0"
"} sub(/^(content:encoded|description)>/, ""){ if($0 == ""){ getline if(sub(/^!\[CDATA\[/, "")){ getline while(!sub(/\]\]>.*/, "")){print "<"$0; getline} print "<"$0 } }else{ gsub(/</, "<") gsub(/>/, ">") gsub(/&/, "\\&") gsub(/"/, "\"") gsub(/'/, "''") print } } ' | htmlfmt -a > /tmp/rss.new diff /tmp/rss.old /tmp/rss.new | sed -n 's/^> //p'