Reverse a word in Vim

Question

How can I reverse a word in Vim? Preferably with a regex or normal-mode commands, but other methods are welcome too:

word => drow

<

Answer 1

Assuming you've got perl support built in to vim, you can do this:

command! ReverseWord call ReverseWord()
function! ReverseWord()
perl << EOF
    $curword = VIM::Eval('expand("")');
    $reversed = reverse($curword);
    VIM::Msg("$curword => $reversed");
    VIM::DoCommand("norm lbcw$reversed");
EOF
endfun

And potentially bind that to a keystroke like so:

nmap ,r :ReverseWord