我正在尝试使用smartmatch运算符将简单字符串与正则表达式模式匹配:
原文链接:/regex/356812.html#!/usr/bin/env perl use strict; use warnings; use utf8; use open qw(:std :utf8); my $name = qr{/(\w+)/}; my $line = 'string'; print "ok\n" if $line ~~ /$name/;
我希望这打印“确定”,但事实并非如此.为什么不?