X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/15119838e45242461fa24a14f1243f751d62321f..d96b16650836046f79dc76641681445f97bd60ce:/countries.plp diff --git a/countries.plp b/countries.plp index 972e312..cd2040d 100644 --- a/countries.plp +++ b/countries.plp @@ -41,19 +41,6 @@ my $cc = do 'countries.inc.pl'; } else { $_ = $short || $name; - s/,.*//; - s/(?<=.)\(.*\)\s*//; - s/ republic\b//gi; - s/ islands?\b//gi; - s/\bthe //g; - s/ and / & /g and s/(?<=.)[a-z ]+//g; - s/\bsaint /st /gi; - s/South(?:ern)? /S-/g; - s/North(?:ern)? /N-/g; - s/New /n./g; - s/(\S)(\S+)-/$1-/g; # strip most chars preceding dash - s/(\S{4}[b-df-hj-np-tv-xz])((?%s',