diff options
| author | Christian Pointner <equinox@helsinki.at> | 2017-09-09 11:32:39 (GMT) |
|---|---|---|
| committer | Christian Pointner <equinox@helsinki.at> | 2017-09-09 11:32:39 (GMT) |
| commit | ccdd2812ced09b55d5c16a6931f8365b4fc252d4 (patch) | |
| tree | a46d6fac243328b173489ce6ddb2ffb5ccfd790f /rhautoimport-nw | |
| parent | 8173833310ea8f50f2b4f61b30b28cd69e9474cc (diff) | |
some improvments and cleanup
Diffstat (limited to 'rhautoimport-nw')
| -rwxr-xr-x | rhautoimport-nw | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/rhautoimport-nw b/rhautoimport-nw index ae9c45b..e24a998 100755 --- a/rhautoimport-nw +++ b/rhautoimport-nw @@ -90,7 +90,8 @@ print "day of Radio Helsinki rebroadcast: " . Date::Calc::Date_to_Text(@import_d my $id = sprintf("%04d-%02d-%02d", @import_date); my $bd = sprintf("%04d-%02d-%02d", @broadcast_day); my $bdfile = sprintf("NETWATCHER[-_]?%04d%02d%02d(.*)\.MP3", @broadcast_day); -print "looking for files from $bd in RSS Feed\n"; + +print "looking for files like '$bdfile' in RSS Feed\n"; print " -> $RSS_URL\n"; my ($result, $feed) = rhautoimport::fetch_parse_rss_cba($RSS_URL); |