wibble
635
reputation
1
5
16
echo password | perl -nle '$="{".join("},{",split(//,$))."}"; s/a/a,4/ig;s/o/o,0/ig;s/s/s,5/ig; print for glob($_);'