求助~关于匹配的问题

驴小兔

#!/usr/bin/perl
use strict;
use warnings;
my $what='fred|barney';
my $a=<STDIN>;
if ($a=~/$what x3/) {
        print "yes";
}

这样写不可以吗？答案上给的是$what{3},为什么？

lpnueg4

我问你，你想匹配 "x3" 这个字符串的时候又怎么写呢？

驴小兔

加括号吗？？回复 2# lpnueg4


   

lkk_super

因为里面要的是正则表达式

104359176

在正则表达式中，和最外层的表达式的语法是不同的：
表示3个连续的 'ab|cd'，在普通表达式中：

1. my $x = 'ab|cd' x 3;

复制代码

在正则表达式中：

1. $x =~ /(ab|cd){3}/;

复制代码

一般的编程语言中，不同的区域的语法规则是不同的：
字符串，注释，正则表达式，在一般的类定义中，也有许多细微的差别。

驴小兔

O(∩_∩)O谢谢回复 4# lkk_super


   

驴小兔

O(∩_∩)O谢谢~回复 5# 104359176