diff --git a/frfac.in b/frfac.in index e07fe85..23f72fe 100755 --- a/frfac.in +++ b/frfac.in @@ -43,7 +43,7 @@ my $latest_episode = pop @episode_links; my @mp3s; sub collect_mp3s { my ($uri, $uri_text) = @_; - push @mp3s, $uri_text if $uri_text =~ /facile_\d+\.mp3$/; + push @mp3s, $uri_text if $uri_text =~ /facile_\d+.*\d+\.mp3$/; } $res = URI::Fetch->fetch($latest_episode) or die URI::Fetch->errstr;