求这段代码怎么理解

slwj

求这段代码怎么理解：
$datgetline = "Y:PRODUCTID:[54-82-050000-032G];TESTPROG:[TBAAUFH9D_2A];STEP:[FH];";
$_ = $datgetline;
my (@servdat) = m"^Y:PRODUCTID:\[([^]]*)\];TESTPROG:\[([^]]*)\];STEP:\[([^]]*)\];";  //这里等号后面的m是什么意思？再有，([^]]*)怎么理解，多谢！

两个问题：
1）my (@servdat) = m"^Y:PRODUCTID:\[([^]]*)\];TESTPROG:\[([^]]*)\];STEP:\[([^]]*)\];";这句，等号后面的m是什么意思？
2）还是上面这个语句，([^]]*)怎么理解

多谢！

zhlong8

整个代码的作用是取 $datgetline 三组中括号里面的值，放到数组 @servdat 里面。

1）等价于 my(@servdat) = ($_ =~ /^Y ..... /); 然后补习下正则表达式吧，这里给你讲完就成教程了

slwj

zhlong8 发表于 2014-03-09 10:32
整个代码的作用是取 $datgetline 三组中括号里面的值，放到数组 @servdat 里面。

1）等价于 my(@servdat ...

非常感谢，请问，是正则表达式的哪个部分？

zhlong8

回复 3# slwj


    http://perldoc.perl.org/perlop.html#Regexp-Quote-Like-Operators 解答你关于 m 是什么意思的。
    http://perldoc.perl.org/perlre.html正则表达式的完整语法。
    http://perldoc.perl.org/perlrecharclass.html字符类的索引，[] \d \w 中文等等。

slwj

zhlong8 发表于 2014-03-10 08:27
回复 3# slwj

多谢！

有中文的部分没

slwj

slwj 发表于 2014-03-08 21:40
求这段代码怎么理解：
$datgetline = "YRODUCTID:[54-82-050000-032G];TESTPROG:[TBAAUFH9D_2A];STEP:[F ...

再有，假如我只想要第一个字段部分：
$datgetline = "YRODUCTID:[54-82-050000-032G];TESTPROG:[TBAAUFH9D_2A];STEP:[FH];";
$_ = $datgetline;
my (@servdat) = m"^YRODUCTID:\[([^]]*)\];";  //只包含第一个字段。这样可以吗

，如上一行，只包含第一个字段。这样可以吗

多谢！