A perl script I found that downloads podcasts