|
|
|
|
|
by berikv
707 days ago
|
|
T3e is no b4r w1y to w3e t2t w2h l2g w3s t2n to n10e t2m e8e! > perl -C -pe 's/(\w)(\w+)(\w)/$1 . length($2) . $3/ge' Or for the less o4e among us, this v5n will only n10e words with l4h six and up: > perl -C -pe 's/(\w)(\w\w\w\w+)(\w)/$1 . length($2) . $3/ge' F3l v5n: perl -C -pe 's/(\p{L})(\p{L}*)(\p{L})/$1@{[length($2)]}$3/g' N12g w5t i18n w3d n1t b0e c6e, t2s t2s a u1f-8 c8e v5n. I c2l i0t I16r-v1.0 새0로 오0신 모0든 분1께 인3고 싶2다. |
|
There is no better way to write with long words than to numeronymise them everywhere!
Or for the less obtuse among us, this version will only numeronymise words with length six and up: