0votos

Palabras pentavocálicas en Shell

por josejuan hace 1 año

lee palabras de la entrada estándar y marca las que son

si una palabra es pentavocálica o no

1
2
3
4
5
6
7
8
9
10
11
12
13
14
$ while read i 
do 
    if [ "aeiou" == `echo "$i" | sed 's/[^aeiou]//g;s/\([aeiou]\)/\1\n/g' | sort -u | perl -n -e 'chomp;print'` ] 
    then 
        echo ">>> $i" 
    fi 
done 
 
murcielago 
>>> murcielago 
acabaramos 
secularizo 
>>> secularizo 
mascullar 

Comenta la solución

Tienes que identificarte para poder publicar tu comentario.