Anonymous user
Rosetta Code/Find bare lang tags: Difference between revisions
finalize
m ({{omit from|GUISS}}) |
(finalize) |
||
Line 1:
{{
Find all <nowiki><lang></nowiki> tags without a language specified in the text of a page. Display counts by language section:
Line 24:
1 in perl ([[Foo]])
2 in no language ([[Baz]])</nowiki></pre>
For more extra credit, use the [http://rosettacode.org/mw/api.php Media Wiki API] to test actual RC tasks.
=={{header|Perl}}==
This is a simple implementation that does not attempt either extra credit.
<lang perl>my $lang = 'no language';
my $total = 0;
|