diff options
Diffstat (limited to 'rhimport-tr')
| -rwxr-xr-x | rhimport-tr | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rhimport-tr b/rhimport-tr index d86bdb9..e02ae0c 100755 --- a/rhimport-tr +++ b/rhimport-tr @@ -86,7 +86,7 @@ print "day of original broadcast: " . Date::Calc::Date_to_Text(@broadcast_day) . print "day of Radio Helsinki broadcast: " . Date::Calc::Date_to_Text(@import_date) . "\n"; my $bd = sprintf("%04d-%02d-%02d", $broadcast_day[0], $broadcast_day[1], $broadcast_day[2]); -my $bdfile = sprintf("^%04d%02d%02d", $broadcast_day[0], $broadcast_day[1], $broadcast_day[2]); +my $bdfile = sprintf("^%04d-?%02d-?%02d", $broadcast_day[0], $broadcast_day[1], $broadcast_day[2]); print "looking for files from $bd in RSS Feed\n"; print " -> $RSS_URL\n"; |