1
0
Fork 0
mirror of https://github.com/notwa/rc synced 2024-06-29 02:17:12 -07:00
rc/sh/scramble

20 lines
522 B
Bash
Executable File

#!/usr/bin/env sh
# YES_ZSH
# YES_BASH
# YES_DASH
scramble() { ### @-
### scrambles text in a predictable way using regex.
###
### sacbremls ttex in a pdrceailtbe way unsig reegx.
[ $# -eq 0 ] || { printf "%s\n" "$0: does not take arguments" >&2; return 1; }
local eggs='s/@\(\w\)\(\w\)\(\w\)/@\3\1@\2/g'
sed \
-e 's/\b\w/&@/g' \
-e "$eggs" -e "$eggs" -e "$eggs" -e "$eggs" \
-e "$eggs" -e "$eggs" -e "$eggs" -e "$eggs" \
-e 's/@//g'
}
[ "${SOURCING:-0}" -gt 0 ] || scramble "$@"