/usr/share/elvis/scripts/decode.ex is in elvis-common 2.2.0-11.1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | "This script defines a :decode alias, which handles simple letter<->number
"ciphers. You tell it a starting letter and number, and it fills in the
"rest of the alphabet.
alias decode {
"secret decoder ring
local i=1 l=-1 n=!2
try let l='!1'
if l < 'a' || l > 'z' || n < 1 || n > 26
then error usage: [lines] decode letter number
while i <= 26
do {
try eval !% s/\<(n)\>/(char(l))/g
let i=i+1
let n=n+1
if n > 26
then set n=1
if l == 'z'
then let l='a'
else let l=l+1
}
}
|