Loading AI tools
From Wikipedia, the free encyclopedia
This Perl script can be used to update WP:WSS/ST. It takes 3 filenames as parameters:
To run the script on *nix systems, you may need to correct the path to perl on your machine found in the first line.
#!/usr/bin/perl open Sizes, $ARGV[0] || die "Cannot open $ARGV[0]: $!\n"; open Types, $ARGV[1] || die "Cannot open $ARGV[1]: $!\n"; open Out, ">$ARGV[2]" || die "Cannot open $ARGV[2]: $!\n"; sub Bin { my $v = $_[0]; if ($v > 800) { return sprintf("'''%i pages'''", $v/200 + 1); } if ($v >= 100) { return sprintf("<%i00", $v/100 + 1); } return "<100" if $v >= 50; return "<50" if $v >= 25; return "<25" if $v >= 10; return "<10"; } while ($str = <Sizes>) { if ($str =~ /\{\{cl\|(.*)\}\}\s+'*(\d+)'*/) { $category = $1; $number = $2; $category =~ s/_/ /g; $size{$category} = $number; } } while ($str = <Types>) { if ($str =~ /(.*?\[\[\:Category\:([^|]*)\|.*\{\{tl\|.*\}\})/ && $size{$2}) { $bin = Bin($size{$2}); print Out "$1 - $bin on March 16\n"; } else { print Out $str; } }
This is the list of stub types that are not listed at WP:WSS/ST. The stub types that are listed in nonstanard way (and therefore weren't caught by the script) are also here. Feel free to remove such stub types from this list.
Last update: January 24 database dump vs January 30 WP:WSS/ST.
Seamless Wikipedia browsing. On steroids.
Every time you click a link to Wikipedia, Wiktionary or Wikiquote in your browser's search results, it will show the modern Wikiwand interface.
Wikiwand extension is a five stars, simple, with minimum permission required to keep your browsing private, safe and transparent.