第四章 语言和声明

4.1 简单语句


一个简单语句是一个表达式,因为副作用而计算。每条简单语句都必须以分号结尾,除非它是一个块中的最后一句。


4.2 if else 语句:


[oracle@jhoa 20150319]$ cat 1.pl 
if (( my $color = <STDIN>) =~ /red/i ) {
      $value = 1;
}
elsif ($color =~ /green/i) {
      $value = 2;
}
elsif ($color =~ /blue/i) {
  $value = 3;
}
else {
     print "unknown"; $value=4;
}
print "\$value is $value\n";


4.3.3 foreach 循环:




累加 $value
[oracle@jhoa 20150319]$ cat 2.pl 
@array = qw/1 2 3 4 5 6 7 8 9 10/;


$sum = 0; fore