my $value = "a2b_cmd.sv";
my @value_q = split('.',$value);
print "$value_q[0]\n";
本想通过split函数 分割 ‘.’ 的隔开元素,但是上面这种写法会报错,提示split失败。
参考链接:https://www.runoob.com/perl/perl-arrays.html
原因在于split 函数把 '.'当成正则表达式匹配了,写成 split(‘\.’, $value);就可以了。
所以split函数是可以通过正则表达式做分割的,具体可以参考链接:https://www.cnblogs.com/f-ck-need-u/p/9655273.html
避免歧义,最好写成如下:
my $value = "a2b_cmd.sv";
my @value_q = split /\./, $value;
print "$value_q[0]\n";