if [ $# -eq 0 ] ; then echo "\07Syntaxe: $0 fichier_de_donnees"; exit 1; fi
if [ ! -s $1 ] ; then echo "\07Erreur: fichier $1 vide ou inexistant" ; exit 1; fi

cat $1 | awk '
{	for (i=1;i<=length($0);i++){
		caractere=substr($0,i,1)
		TabCar[caractere]+=1
		NbCarTotal+=1
	}
}
END{
	print "Statistiques sur le fichier:" FILENAME
	print "Nombre de caracteres = " NbCarTotal
	print "Caractere          Nombre          Frequence"
	for (i in TabCar){
		Freq[i]=TabCar[i] / NbCarTotal *100
		printf "\n  %c   %4d    %5.2f", i, TabCar[i], Freq[i]
}'