s/^\s*//; chomp; s/\s+$//; s/\s+/ /g;
s/\<\/?(?:b|em)\>//g;
s/\{\{(?:chart\ style|Chart league difficulty)\|[^{}]*\}\}//gi;
+ s/^\{\{(?:testing|current)\}\}//;
next unless m/\{\{/; # only interested in chart template stuff
if (($x,$y,$arch) =
m/^\{\{ chart\ label \|(\d+)\|(\d+)\| .*
(?: \<(?: big|center )\>)* \'+
(?: \[\[ | \{\{ )
- [^][\']* \| ([^][\'|]+)\ archipelago
+ [^][]* \| ([^][|]+)\ archipelago
(?: \]\] | \}\} )
\'+ (?: \<\/(?: big|center )\>)* \}\}$/xi) {
printf $debugfh "%2d,%-2d arch %s\n", $x,$y,$arch;