perl2个小问题

garyfujian

刚开始学习perl，还望前辈指点1，2。


1.       
在Perl 中是一条通用规则：如果去掉括号含义不变，那括号就是可选的.
@array=1..5 ; #ok
@array=1,2,3,4,5；#no 必须（1，2，3，4，5） Useless use of a constant in void context

这时括号为何不能省略？加上告警了，还是没太看懂。


2.        不加引号的字符串算什么？
@array=（“fred”, “barney”, “betty”, “wilma”, “dino”）；#ok
@array=（fred, barney, betty, wilma, dino）；#可以执行，但加告警时会告警；Unquoted string "fred" may clash with future reserved word

这样是否代表要表达字符串时最好用引号把标量引用起来？

zhlong8

第一个是优先级 = , 优先级决定的

第二个除了 q qq qw use require => 和 hash 索引时，这几个简单的情况外总是加引号。可能这些你还没见全，那就是字符串的都加。省略引号那是 Perl4 和以前的遗留应该，Perl 5 都已经17年了

garyfujian

很明了，谢谢

zhlong8 发表于 2012-01-30 17:47
第一个是优先级 = , 优先级决定的

第二个除了 q qq qw use require => 和 hash 索引时，这几个简单的情况 ...

zhlong8

garyfujian 发表于 2012-01-31 10:01
很明了，谢谢

use 是不能加引号的，这个写错了。 编译器在遇到 bareword 也就看起来像字符串却又没引号的东西的时候会先判断是不是个函数，如果不是就当字符串处理。

所以 $a = what; 这个是合法的 $a 是字符串 'what'，但是如果你定义了 what 这个函数那就是另一重意思了，编译的结果取决于之前是否声明了 what 这个函数。 这种时候就容易产生 bug 所以并不推荐使用。

q qq qw => 那是语法明确规定的不需要引号，合理的估计也就是 require 和 hash 索引这两种情况。

zhlong8

另一方面如果你的函数在用之前没有声明，也没用 & 和括号，那就被当成字符串了。有参数还好能被编译器检查出来，没参数的话那就悲剧了，所以 use warnings 还是很必要的。

garyfujian

多谢前辈的指点，在这里还再请教下几个小问题哈

（1）use strict; 要求变量使用 my，这样区块私有变量怎么实现，怎么区分；可否理解成区块外部的是本文件的私有变量，区块内部的是区块私有变量，互相不影响？经实验证实是正确的。可否这样理解？


（2）使用my操作符的问题，①②都正常，③不是我想要的
my $var=1;
① my $var=$var+1;  #输出为2
② $var+=1;         #输出为2
③ my $var+=1;      #输出为 1   my操作符再次使用赋值undef给变量？

（3）当函数碰到优先级
sub division｛｝
my $quotient = division 355, 113;  #虽然=比，优先级高，为啥不告警，是因为perl解释器会自动判别函数名后面都是参数？

zhlong8 发表于 2012-01-31 10:32
另一方面如果你的函数在用之前没有声明，也没用 & 和括号，那就被当成字符串了。有参数还好能被编译器检查出 ...

gaoyang636

1. block内的变量还是用my在block里面声明，如果是static var，则用local；
2. ③ 用my,即重新声明初始化了该变量，即0+1，得1；
3.这里有函数，先是函数运算，得到一个value，=号前面是标量上下文，不存在错误

zhlong8

garyfujian 发表于 2012-01-31 15:27
多谢前辈的指点，在这里还再请教下几个小问题哈

（1）use strict; 要求变量使用 my，这样区块私有变量怎 ...

my 是词法变量，它从声明处起作用，直到包含它声明的语法块结束的部分，比如

  {
    xxx;
    xxx;
   my $a; 下面 $a 可见
    {
    xxx; # $a 可见
    }
  }  #出了语法块 $a 不可见

第二个不知道你什么意思，另外 my $val += 1; 这个应该没什么实际意义

第三个 = 的优先级是比 , 高，但是你忽略了函数调用的级别。这里推荐所有搞不太清楚的人仔细研读 perlop 的第二小节 Terms and List Operators (Leftward)  10遍，理解 list operator 的两个优先级是个很美妙的经验

seufy88

第一个问题我刚问过.
不过没想到是用".."这个操作符
@array=1..5;   #ok
@array=(1,2,3,4,5);  #ok
@array=1,2,3,4,5  #bad
感谢zhlong8