リテラルで置換
投稿:2018-07-17
リテラルで半角を全角に置換しても良さそうなので試してみよう。
#!/usr/bin/env perl -w use utf8; use strict; use warnings; use open IO => ":utf8"; use Encode::Argv; use Encode::Locale; binmode STDIN, ":encoding(console_in)"; binmode STDOUT, ":encoding(console_out)"; binmode STDERR, ":encoding(console_out)"; $| = 1; my $str = "ニューヨーク シティボーイ"; print "$str\n"; $str =~ s/ / /; print "$str\n"; exit;
Windows7(Perl 5.26)とCentOS(Perl 5.24)で同じ結果になりました。
ニューヨーク シティボーイ ニューヨーク シティボーイ件の記事では文字コードを指定して解決していますから、おそらくリテラルで失敗したのだろうと推測します。 どうして起きてしまうのか興味深いです。