Mike Small 2020-11-26 11:15:37 -05:00
parent 9fdc9e5eb1
commit e4d88b439c

View File

@ -27,7 +27,7 @@ my $LX = HTML::LinkExtractor->new(undef, $BASE_URI);
$LX->parse(\$epis_list_html);
for my $link (@{$LX->links}) {
next unless $link->{href};
if ($link->{href} =~ /facile-\d+-\d+h\d+-gmt\s*$/) {
if ($link->{href} =~ /facile.*\d+h\d+-gmt\s*$/) {
push @episode_links, $link->{href};
}
}