string reverser
Posted to
tcl
by anto at Tue Jul 15 20:39:05 GMT 2008
view raw
#!/usr/bin/tclsh
puts
[
string
map {a ɐ
b q
c ɔ
d p
e ǝ
f ɟ
g ɓ
h ɥ
i ı̣
j ɾ
k ʞ
l լ
m ɯ
n u
p d
q b
r ɹ
t ʇ
u n
v ʌ
w ʍ
y ʎ
' ,
, '
. ˙
? ¿
} [
string
reverse [
join
$argv
" "]]]
Recent Posts
tcl by Bombo
16 hours ago
tcl by egavilan
9 days ago
tcl by bch
15 days ago
tcl by Bradipo
15 days ago
tcl by aspect
15 days ago
tcl by Bradipo
15 days ago
tcl by Bradipo
15 days ago
tcl by Bradipo
15 days ago
lilypond by Bradipo
16 days ago
tcl by cgm
26 days ago
Submit
New paste
Documentation
From Jabber