Fix wide character problem on perl 5.18.2