#!/bin/bash

# compte les elements
nb_files=$(find . -type f -a \( -name "*.elmt" -o -name "qet_directory" \) | wc -l)

# compte les elements sans traduction
lang=${1:-en}
not_translated_files=$(find . -type f -a \( -name "*.elmt" -o -name "qet_directory" \) -exec grep -L "<name lang=\"$lang\"" "{}" \; | wc -l)
((translated_files=$nb_files - $not_translated_files))
perl -e "printf(\"%i/%i (%.1f%%)\n\", $translated_files, $nb_files, $translated_files / $nb_files * 100)"