view bin/acronym @ 12352:cf652da78b89 draft

<wib_jonas> `` perl -pi -e \'s/print (.*)/print($1)/\' /hackenv/bin/password
author HackEso <hackeso@esolangs.org>
date Wed, 04 Nov 2020 14:37:41 +0000
parents 1730bda7af32
children
line wrap: on
line source

w="${1:-tla}"; (for (( i=0;i<${#w};i++ )); do grep -i "^${w:$i:1}[a-z]*\$" $HACKENV/share/dict-words | shuf -n 1; done) | xargs