Perl语言入门之二

waid

　　写在前面:在Perl中除非会改变表达式的意义,否则Perl的某些东西是可以省略;
5.子程序
  A.定义子程序,使用关键字sub.(可以定义在程序的任意位置,它的定义是全局的,如果重名,以最后一个为主)
eg:
  sub marine{
   $n +=1;
   print "hello,sailor number $n!\n ";
   }
  B.调用子程序: &marine;或者省略&(&表在程序中查找子程序)
  C.返回值:最后运算结果就是子程序的返回值;建议用print协助调试.
  D.参数:Perl自动将参数列表化名为特殊的数组变量@_,即参数为@_[0]...@_[n]
  E.子程序中的私有变量:操作符my
eg: sub max{
  my($m,$n) = @_; #赋值,,($m,$n)私有变量
  if($m>$n){
   $m;
   }else{ $n}
}
  F.return操作符:从子程序中立即返回某个值
6.输入与输出
  A.读取标准输入:<STDIN>操作符
  B.钻石操作符输入:<> (可以在程序的参数带文件或输入),它的参数来自@ARGV数组,即可以强制的限定读取的文件(eg.@ARGV=qw(a,b,c));
  eg:  while(<>){
         chomp;
         print "It was $_ !\n";
      }
  C.输出到标准的输出:print操作符读一列表里的所有值.
  D.使用printf格式化输出,与C一样
  E.文件句柄:(Perl6个特殊的文件句柄:STDIN,STDOUT,STDERR,DATA,ARGV,ARGVOUT)
  F.用die处理严重错误:$!可读出系统出错的信息
  G.改变默认的文件输出句柄:select LOG
7.哈希
  A.访问哈希元素:$hash{$key} .$hash{$key} = value
    访问整个哈希:%hash .%hash =(key0,value0,key1,value1)
   或  .%hash =(key0 => value0,key1 => value1)
  B.哈希函数:keys函数返回哈希的key列表,values函数返回value值列表
    eg: my @k = keys %hash;  my @v = values %hash;
    each函数返回key与value
    eg:  while( ($key,$value) = each %hash ){
            print "$key => $value \n";
         }
    exists函数查看哈希某个键在不在: exists $book{"dino"};
   delete 函数从哈希中删除指定的键: delete $book{"dino"};
  C.%ENV哈希:读系统环境信息,
   eg:print "PATH is $ENV{PATH} \n";