|
|
@@ -171,7 +171,7 @@ sub adh_abo_ffdn {
|
|
|
my $fh3;
|
|
|
# on met l'info dans le fichier
|
|
|
open ($fh3, '>', $filenameadh) or die "Impossible d'ouvrir le fichier $filenameadh en écriture";
|
|
|
- print $fh3 "La fédé compte ".$nb_adh_ffdn ." adhérent·e·s et ". $nb_abo_ffdn ." abonné·e·s";
|
|
|
+ print $fh3 "La fédé compte ".$nb_adh_ffdn ." adhérent·e·s et ". $nb_abo_ffdn ." abonné·e·s. C'est un ratio de ".sprintf("%.1f", $nb_abo_ffdn / $nb_adh_ffdn * 100)."%.";
|
|
|
close $fh3;
|
|
|
|
|
|
}
|
