X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/8b237b43167a2443b69b6c0a3aec13c926782fc1..c2f9c9e9c05d8639e4d968efd26c393fcf6da1f1:/countries.plp diff --git a/countries.plp b/countries.plp index 24be348..efd2f25 100644 --- a/countries.plp +++ b/countries.plp @@ -2,21 +2,22 @@ Html({ title => 'country code cheat sheet', - version => 'v1.1', + version => '1.3', description => "Table of ISO-3166-1 country codes with the names of reserved territories.", keywords => [qw'country code cc tld cctld continent territory land table'], stylesheet => [qw'light dark circus mono red'], + data => ['data/countries.inc.pl'], }); :>
â³";
@@ -33,22 +34,30 @@ my $cc = do 'countries.inc.pl';
next;
};
my ($name, $class, $short, $ref) = @$country;
+ $name .= " â $ref" if $ref;
$ref ||= $code;
- local $_ = $ref;
+ my $cell;
if (exists $get{show}) {
- my $img = "data/flag/$ref.png";
- $_ = sprintf ' | %s', - $_ ? 'X '.$class : '', EscapeHTML("$code: $name"), $_; + $cell ? 'X '.$class : '', EscapeHTML("$code: $name"), $cell; } print "\n"; } - print " |
---|