diff --git a/filter.pl b/filter.pl index 6e8671a..b45b020 100755 --- a/filter.pl +++ b/filter.pl @@ -23,7 +23,7 @@ BEGIN my $class = $tags{$tag}; my $title = $titles{$tag}; - if (/<$tag>/) { + while (/<$tag>/) { my $count = ($counts{$tag} ||= 1)++; $title =~ s/%n/$count/; @@ -33,5 +33,5 @@ BEGIN s#<$tag>#$replacement#; } - s##\n#; + s###g; }