$char = 'i';

$char = chr 216 - ord $char;
$char =~ tr/io/oi/;