diff options
Diffstat (limited to 'rhimport-rs')
-rwxr-xr-x | rhimport-rs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rhimport-rs b/rhimport-rs index 322d6fc..03d98c1 100755 --- a/rhimport-rs +++ b/rhimport-rs @@ -129,7 +129,7 @@ if(Date::Calc::Delta_Days(@broadcast_date, @today) <= 0) { my $id = sprintf("%04d-%02d-%02d", $import_date[0], $import_date[1], $import_date[2]); my $bd = sprintf("%04d-%02d-%02d", $broadcast_date[0], $broadcast_date[1], $broadcast_date[2]); -my $bdfile = sprintf("RAST%04d%02d%02dCBA(.*)\.MP3", $broadcast_date[0], $broadcast_date[1], $broadcast_date[2]); +my $bdfile = sprintf("RAST%04d%02d%02d(CBA)?(.*)\.MP3", $broadcast_date[0], $broadcast_date[1], $broadcast_date[2]); print "looking for files from $bd in RSS Feed\n"; print " -> $RSS_URL\n"; |