X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/60876481060ad63e3a2e450d18351e01f850cce6..dae21a09b01baa118720670247a87c5cdc2591b8:/cc.plp diff --git a/cc.plp b/cc.plp index 57a8d91..b36d744 100644 --- a/cc.plp +++ b/cc.plp @@ -13,9 +13,15 @@ $header{content_type} = 'text/html; charset=utf-8';
+â±"; print ' | ', $_ for 'a' .. 'z'; @@ -49,11 +55,32 @@ sub quote { print $code =~ /^x|^q[m-z]|^aa|^zz/ ? ' | ' : ' | ';
next;
};
- $code = $country->[2] if defined $country->[2];
- my $img = sprintf '![]() | %s', - $img ? 'X '.$country->[1] : '', quote($country->[0]), $img; + $_ ? 'X '.$class : '', quote("$code: $name"), $_; } print "\n"; } @@ -68,21 +95,23 @@ sub quote { | africa | europe | asia - | oceania | antarctica + | oceania | south america | north america - | reserved + | reserved | user-assigned |
---|