Myna
ABCDEFGHJIKLMNOPQRSTUVWXYZ
abcdefghjiklmnopqrstuvwxyz
1234567890(){}[]/\<>,.;:`'

# Perl
$_="krjhruaesrltre c a cnP,ohet";$_.=$1,print$2while s/(..)(.)//;print"\n"

-- Haskell
mapM_ print . take 10 . iterate (\n -> if even n then n `div` 2 else 3*n + 1)

# bash
find . -name "*.log" -mtime +30 -exec gzip {} \; | tee audit.txt | wc -l

// Rust
(0..10).map(|x| x*x).filter(|&x| x%2==0).collect::<Vec<_>>()

⍝ APL
life ← { ⊃1 ⍵ ∨.∧ 3 4 = +/ +⌿ ¯1 0 1 ∘.⊖ ¯1 0 1 ⌽¨ ⊂⍵ }
