i=$(words $(filter 0%,$(subst $c, 0,$(STDIN))))
r=r s t u v w x y z
$(foreach c,A B C D E F G H I J K L M N O P Q R S T U V W X Y Z a b c d e f g h i j k l m n o p q $r,$(info $c: $(if $(word $i,$r), )$i))