sharpetronics/QGIS
1
0
Fork 0
mirror of https://github.com/qgis/QGIS.git synced 2025-04-15 00:04:00 -04:00
Code Issues Packages Projects Releases Wiki Activity

update tsstat.pl

Browse Source
This commit is contained in:
Juergen E. Fischer 2012-02-13 03:36:55 +01:00
parent 38113fb92c
commit 8a9cb76868
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
scripts/tsstat.pl
View File

@ -6,7 +6,7 @@ use Locale::Country;
my @lang; my @lang;
print "{| border='1' \n |Language||Count||Translated||Translation finished||Translation unfinished||Untranslated||Percentage \n |- \n"; print "|Language|Count|Translated|Translation finished|Translation unfinished|Untranslated|Percentage|\n";
for my $i (<i18n/qgis_*.ts>) { for my $i (<i18n/qgis_*.ts>) {
my ($langcode) = $i =~ /i18n\/qgis_(.*).ts/; my ($langcode) = $i =~ /i18n\/qgis_(.*).ts/;
@ -44,6 +44,5 @@ for my $i (<i18n/qgis_*.ts>) {
for my $l (sort { $b->{percentage} <=> $a->{percentage} } @lang) { 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", "|-\n"; print "|", $l->{name}, "|", join("|", $l->{n}, $l->{translations}, $l->{finished}, $l->{unfinished}, $l->{untranslated}, sprintf("%.1f", $l->{percentage}) ), "|\n";
} }
print "|}","\n";