这是整个脚本:
#!/usr/bin/perl
use v5.14; use warnings;
my $reg = qr/test/i;
say "matched 1" if $reg =~ "test"; # matches
say "matched 2" if $reg =~ "Test"; # no match
Run Code Online (Sandbox Code Playgroud)
第一种情况匹配,第二种情况不匹配.我究竟做错了什么?
结合运营商=~有串在左边,和正则表达式的右侧.
"test" =~ $reg;
Run Code Online (Sandbox Code Playgroud)