#!/bin/sh

curl -Ls "$@" |
sed -n '/<item>/,$p' |
sed -e '/^$/d' -e 's/^[	 ]*//' |
awk -vFS='[<>]' -vOFS='	' '
	/<pubDate>/ { date = $3 }
	/<itunes:duration>/ { duration = $3 }
	/<enclosure[^>]*>/ { file = $0 }
	/<description>$/ { getline; summary = $0 }
	/<description>..*/ { summary = $3 }
	/<itunes:summary>$/ { getline; summary = $0 }
	/<itunes:summary>..*/ { summary = $3 }
	/<title>/ { title = $3 }
	/<\/item>/ {
		print "Title: " title
		print "Duration: " duration
		print "Date: " date
		print "File: " file
		print "Summary: " summary
		print ""
		date = "?"
		duration = "?"
		file = "?"
		summary = "?"
		title = "?"
	}
' |
sed	-e 's,<description>,,' \
	-e 's,<enclosure[^>]* url="\([^"]*\)".*,\1,' \
	-e 's,<!\[CDATA\[\(.*\)\]\]>,\1,'