Skip to content
Permalink
Browse files

script update

git-svn-id: http://svn.osgeo.org/qgis/trunk/qgis@10347 c8812cc2-4d05-0410-92ff-de0c093fc19c
  • Loading branch information
macho
macho committed Mar 20, 2009
1 parent 0083d25 commit dc29466b311325f0d34225f14855525757f69fc0
Showing with 8 additions and 1 deletion.
  1. +8 −1 scripts/tsstat.pl
@@ -4,6 +4,8 @@
use Locale::Language;
use Locale::Country;

my @lang;

print "||'''Language'''||'''Count'''||'''Translated'''||'''Translation finished'''||'''Translated unfinished'''||'''Untranslated'''||'''Percentage'''||\n";

for my $i (<i18n/qgis_*.ts>) {
@@ -37,5 +39,10 @@

my $n = $translations+$untranslated;

print "||'''$name'''||$n||$translations||$finished||$unfinished||$untranslated||" . sprintf("%.1f%", ($n-$untranslated)/$n*100) . "||\n";
push @lang, { name=>$name, n=>$n, translations=>$translations, finished=>$finished, unfinished=>$unfinished, untranslated=>$untranslated, percentage=>($n-$untranslated)/$n*100 };
}


for my $l (sort { $b->{percentage} <=> $a->{percentage} } @lang) {
print "||'''", $l->{name}, "'''||", join("||", $l->{n}, $l->{translations}, $l->{finished}, $l->{unfinished}, $l->{untranslated}, sprintf("%.1f", $l->{percentage}) ), "||\n";
}

0 comments on commit dc29466

Please sign in to comment.
You can’t perform that action at this time.