<pre name="code" class="html">[root@wx03 0724]# perl a1.pl
112
[root@wx03 0724]# perl a1.pl
dawe^H^H微信adda
success
[root@wx03 0724]# perl a1.pl
22微信3131
success
[root@wx03 0724]#
[root@wx03 0724]# cat a1.pl
my $a=<STDIN>;
my $b='微信';
if ($a =~/$b/){print "success\n";};
[root@wx03 0724]# perl a1.pl
22微信3131
[root@wx03 0724]# cat a1.pl
use Mojolicious::Lite;
my $a=<STDIN>;
my $b='微信';
if ($a =~/$b/){print "success\n";};
此时匹配不上了:
因为开启了utf8;
[root@wx03 0724]# perl a1.pl
22微信3131
success
[root@wx03 0724]# cat a1.pl
use Mojolicious::Lite;
use Encode;
my $a=<STDIN>;
my $b=encode_utf8('微信');
i
utf8字节
最新推荐文章于 2021-01-17 00:04:40 发布
这篇博客探讨了在Perl中处理UTF8字符与使用Mojolicious框架时遇到的问题。通过示例代码展示了如何正确地读取和匹配含有UTF8字符的输入,以及解决宽字符警告和变量声明冲突的方法。
摘要由CSDN通过智能技术生成