Two easy, not-slick ways:
perl -e'$a="aaaa";until($a gt"dddd"){print "$a\n" if $a=~/[a-d]{4}/; $ +a++}' perl -e 'for $a ('a'..'d'){for $b ('a'..'d'){for $c ('a'..'d'){for $d +('a'..'d'){print "$a$b$c$d\n"}}}}'
In reply to Re: creating all possible random 'words' from 4 letters
by qq
in thread creating all possible random 'words' from 4 letters
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |