print $count, "cat", (($count==1)?"":"s"), "\n";
print $count, "cact", (($count==1)?"us":"i"), "\n";
print $count, "Elvi", (($count==1)?"s":"i"), "\n";