view bin/mirrorgo @ 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 b9ced0a7783a
children
line wrap: on
line source

#!/bin/bash
declare {{a..h},{j..t}}="$((i++))" letters=({{a..h},{j..t}}); while read -r; do echo "${letters[18-${REPLY:0:1}]}$((20-${REPLY:1}))"; done