#!perl -an
print+map{/./;9-$&.$'}sort map{9- y/aAeEiIoOuU//." $_\n"}@F