默认情况下, perl中的所有变量都是全局的。
如果要创建私有变量, 可以用my关键字,
它能另一个变量局限于子程序或一个语句块中。({ } 为一个语句块)
在perl中, 函数的参数会被自动保存到数组变量: @_中, 第一个变量为$_[0], 第二个为: $_[1], 依次类推。
root@firecat:~# cat test.pl
#!/usr/bin/perl -w
sub max{
my $number = @_;
print "参数个数为: $number\n";
print "@_\n";
my $max = shift @_;#把第一个当做最大值
foreach (@_){
if($_ > $max){
$max = $_;#最大值存到max中
}
}
print "最大值为: $max\n";
}
&max(1, 3, 5, 2, 4, 6, 22, 0,8);
用my声明变量时注意:
my $test;
my ($test, $test1);
声明多个时, 用括号括住