diff options
author | Christian Pointner <equinox@helsinki.at> | 2016-06-02 19:40:58 (GMT) |
---|---|---|
committer | Christian Pointner <equinox@helsinki.at> | 2016-06-02 19:40:58 (GMT) |
commit | f8e6b7f69fc217262b838ba812277e3d42fd6422 (patch) | |
tree | d976467da1383dfa0e2b76c0b9992a7a300aeace | |
parent | 24b3b94dcd60a9a7bed5cca076d4bb66f435fad6 (diff) |
make btl importer less pedantic
-rwxr-xr-x | rhautoimport-btl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rhautoimport-btl b/rhautoimport-btl index 2144053..b07c5b9 100755 --- a/rhautoimport-btl +++ b/rhautoimport-btl @@ -86,7 +86,7 @@ print "ending of current broadcast cycle: " . Date::Calc::Date_to_Text(@broadcas my $id = sprintf("%04d-%02d-%02d", @import_date); my $bd = sprintf("%04d-%02d-%02d", @broadcast_date); -my $bdfile = sprintf("%02d%02d%02d-btlv128\.mp3", $broadcast_date[0]%100, $broadcast_date[1], $broadcast_date[2]); +my $bdfile = sprintf("%02d%02d%02d.*-btlv128\.mp3", $broadcast_date[0]%100, $broadcast_date[1], $broadcast_date[2]); print "looking for files like '$bdfile' in RSS Feed\n"; print " -> $RSS_URL\n"; |