diff options
| author | Christian Pointner <equinox@helsinki.at> | 2016-01-31 17:47:27 (GMT) |
|---|---|---|
| committer | Christian Pointner <equinox@helsinki.at> | 2016-01-31 17:47:27 (GMT) |
| commit | 5a6a71e977a4e12bcff38c502c9c83be9c7616f9 (patch) | |
| tree | 7a2e74c39638a2d03a6ad47180f565997da26f70 /rhautoimport-nw | |
| parent | 6f540322a1a3db6fdcdf309b998c0c858696afac (diff) | |
updated netwatcher regex
Diffstat (limited to 'rhautoimport-nw')
| -rwxr-xr-x | rhautoimport-nw | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rhautoimport-nw b/rhautoimport-nw index 3d6656b..f09fe08 100755 --- a/rhautoimport-nw +++ b/rhautoimport-nw @@ -88,7 +88,7 @@ print "day of Radio Helsinki broadcast: " . Date::Calc::Date_to_Text(@import_dat 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); +my $bdfile = sprintf("NETWATCHER[-_]?%04d%02d%02d(.*)\.MP3", @broadcast_day); print "looking for files from $bd in RSS Feed\n"; print " -> $RSS_URL\n"; |