$selection->MoveRight ( Unit => wdCharacter, Count => 1);

##</code><code>##

  $selection->MoveRight ( { Unit => wdCharacter, Count => 1 } );