summaryrefslogtreecommitdiff
path: root/rhimport-oi
diff options
context:
space:
mode:
authorChristian Pointner <equinox@helsinki.at>2015-05-16 11:42:08 (GMT)
committerChristian Pointner <equinox@helsinki.at>2015-05-16 11:42:08 (GMT)
commit07c71b9ced1ec24e6848addde92ae148771a2af8 (patch)
tree0b6b4c6de28034ce9b04af96903fc30e81a5231f /rhimport-oi
parentb3f90f24c5ada5cd602f7a9bfd37b81c234a73f3 (diff)
make onda info regexp more flexible
Diffstat (limited to 'rhimport-oi')
-rwxr-xr-xrhimport-oi2
1 files changed, 1 insertions, 1 deletions
diff --git a/rhimport-oi b/rhimport-oi
index a08490d..b2d5377 100755
--- a/rhimport-oi
+++ b/rhimport-oi
@@ -85,7 +85,7 @@ print "day of next Radio Helsinki broadcast: " . Date::Calc::Date_to_Text(@impor
print "Number of next broadcast: " . $broadcast_num . "\n";
my $id = sprintf("%04d-%02d-%02d", @import_date);
-my $bdfile = sprintf('.*ondainfo_%d.*\.mp3$', $broadcast_num);
+my $bdfile = sprintf('.*onda.?info_%d.*\.mp3$', $broadcast_num);
my $current_stat = `cat $STAT_FILE`;
my ($current_id, $current_file) = $current_stat =~ m/^(.*)\n(.*)/;