Perl中的子程序学习笔记

一、定义

函数可分为系统函数和用户函数。子程序即执行一个特殊任务的一段分离的代码，它可以使减少重复代码且使程序易读。PERL中，子程序可以出现在程序的任何地方。定义方法为：

代码如下:

sub subroutine{
    statements;
  }

二、调用 
  调用方法如下：
1、用&调用

代码如下:

&subname;
  ...
  sub subname{
    ...
  }

2、先定义后调用 ，可以省略&符号

代码如下:

sub subname{
    ...
  }
  ...
  subname;

建议采取这种方式。
3、前向引用 ，先定义子程序名，后面再定义子程序体

代码如下:

sub subname;
  ...
      subname;
  ...
  sub subname{
    ...
  }

4、用do调用
  do my_sub(1, 2, 3);等价于&my_sub(1, 2, 3);
三、返回值 
  缺省的，子程序中最后一个语句的值将用作返回值。语句return (retval);也可以推出子程序并返回值retval，retval可以为列表。
四、局部变量 
  子程序中局部变量的定义有两种方法：my和local。其区别是：my定义的变量只在该子程序中存在；而local定义的变量不存在于主程序中，但存在于该子程序和该子程序调用的子程序中(在PERL4中没有my)。定义时可以给其赋值，如：
 

代码如下:

my($scalar) = 43;
  local(@array) = (1, 2, 3);

五、子程序参数传递
1、形式

代码如下:

&sub1(&number1, $number2, $nubmer3);
  ...
  sub sub1{
    my($number1, $number2, $number3) = @_;
    ...
  }

2、传送数组

代码如下:

&addlist (@mylist);
  &addlist ("14", "6", "11");
  &addlist ($value1, @sublist, $value2);
  ...
  sub addlist {
    my (@list) = @_;
    ...
  }

参数为数组时，子程序只将它赋给一个数组变量。如

代码如下:

sub twolists {
    my (@list1, @list2) = @_;
  }

中@list2必然为空。但简单变量和数组变量可以同时传递：

代码如下:

&twoargs(47, @mylist); # 47赋给$scalar，@mylist赋给@list
  &twoargs(@mylist); # @mylist的第一个元素赋给$scalar，其余的元素赋给@list
  ...
  sub twoargs {
    my ($scalar, @list) = @_;
    ...
  }

六、递归子程序

PERL中，子程序可以互相调用，其调用方法与上述相同，当调用该子程序本身时，即成了递归子程序。递归子程序有两个条件：1、除了不被子程序改变的变量外，所有的变量必须的局部的；2、该子程序要含有停止调用本身的代码。

七、用别名传递数组参数

1、用前面讲到的调用方法&my_sub(@array)将把数组@array的数据拷贝到子程序中的变量@_中，当数组很大时，将会花费较多的资源和时间，而用别名传递将不做这些工作，而对该数组直接操作。形式如：

代码如下:

@myarray = (1, 2, 3, 4, 5);
  &my_sub(*myarray);
  sub my_sub {
    my (*subarray) = @_;
  }

2、此方法类似于C语言中的传递数组的起始地址指针，但并不一样，在定义数组的别名之后，如果有同名的简单变量，则对该变量也是起作用的。如：

代码如下:

$foo = 26;
  @foo = ("here's", "a", "list");
  &testsub (*foo);
  ...
  sub testsub {
    local (*printarray) = @_;
    ...
    $printarray = 61;
  }

当子程序执行完，主程序中的$foo的值已经成了61，而不再是26了。
3、用别名的方法可以传递多个数组，如：

代码如下:

@array1 = (1, 2, 3);
  @array2 = (4, 5, 6);
  &two_array_sub (*array1, *array2);
  sub two_array_sub {
    my (*subarray1, *subarray2) = @_;
  }

在该子程序中，subarray1是array1的别名，subarray2是array2的别名。
八、预定义的子程序 
  PERL5预定义了三个子程序，分别在特定的时间执行，它们是：BEGIN子程序在程序启动时被调用；END子程序在程序结束时被调用；AUTOLOAD子程序在找不到某个子程序时被调用。你可以自己定义它们，以在特定时间执行所需要的动作。如：
 

代码如下:

BEGIN {
    print("Hi! Welcome to Perl!\n");
  }
  AUTOLOAD{
    print("subroutine $AUTOLOAD not found\n"); # 变量$AUTOLOAD即未找到的子程序名
    print("arguments passed: @_\n");
  }

若同一个预定义子程序定义了多个，则BEGIN顺序执行，END逆序执行。

赞 (0)

相关推荐

  • Perl函数(子程序)学习笔记

    一.函数定义 子程序即一段分离的代码,它可以使减少重复代码且程序易读.perl中,子程序可以出现在程序的任何地方.但一般放在程序的开始或结尾. 复制代码 代码如下: sub subroutine{     statements; } sub开始,子程序名同变量的命名规则,可与变量同名,最好不要与内部函数同名,如果与内部函数同名则用$subroutine区分,不用&是内部函数,用&是定义函数,但省略&时混淆. 带有原型说明的子程序定义: 复制代码 代码如下: sub subrouti

  • perl子程序的运用及子程序中变量私有(my)声明的重要性

    一个转换程序,简单的把DNA序列中的A转变成T,第一种情况没有使用私有变量. 复制代码 代码如下: #!/bin/perl#下面是一段DNA序列  $DNA=ATTATATAT;#这里是我们的序列  $result=A_to_T($DNA);  print "I changed all $DNA A to T, and the we get the result $result\n\n"; sub A_to_T   {     my ($input)=@_;     $DNA=$inp

  • perl push的用法及子程序返回值的反思

    pop 操作将数组的最后一个元素取出并返回: @array=5..9; $fred=pop(@array); #$fred 得到 9,@array 现在为(5,6,7,8) $barney=pop@array; #$barneygets8,@array 现在为(5,6,7) pop@array; #@array 现在为(5,6)(7 被丢弃了) 最后一个例子中,pop 使用在"inavoidcontext",也就是说没有存放其返回值的地方.这样使用 pop 是合法的. 如果数组为空,那

  • perl中子程序中参数的两种引用(传递)方式介绍

    下面是一个例子: 复制代码 代码如下: use strict;#这里是两个数组my @i =('1','2','3');my @j =('a','b','c'); #在进行处理之前,我们把他们先打印出来,看一看他们的样子print "In main program before calling subroutine:i="."@i\n";print "In main program before calling subroutine:j=".&q

  • perl 子程序 sub

    一.定义    子程序即执行一个特殊任务的一段分离的代码,它可以使减少重复代码且使程序易读.PERL中,子程序可以出现在程序的任何地方.定义方法为:   sub subroutine{     statements;   } 二.调用    调用方法如下: 1.用&调用    &subname;   ...   sub subname{     ...   } 2.先定义后调用 ,可以省略&符号   sub subname{     ...   }   ...   subname;

  • Perl中的子程序学习笔记

    一.定义 函数可分为系统函数和用户函数.子程序即执行一个特殊任务的一段分离的代码,它可以使减少重复代码且使程序易读.PERL中,子程序可以出现在程序的任何地方.定义方法为: 复制代码 代码如下: sub subroutine{     statements;   } 二.调用    调用方法如下: 1.用&调用 复制代码 代码如下: &subname;   ...   sub subname{     ...   } 2.先定义后调用 ,可以省略&符号 复制代码 代码如下: sub

  • Perl中的控制结构学习笔记

    一.条件判断 复制代码 代码如下: if ( ) {       }   elsif ( ) {       }   ...   else{       } 建立i f语句的另一种方法是使用多个表达式,然后根据哪个表达式是真,来运行代码:可以像下面这样来读取上面这个语句块:如果标号为e x p r e s s i o n 1的表达式是真,那么语句块B L O C K 1就运行.否则,控制权转给e l s i f,对e x p r e s s i o n 2进行测试,如果该表达式是真, 则运行B

  • Perl中的模式匹配学习笔记

    一.简介 模式指在字符串中寻找的特定序列的字符,由反斜线包含:/def/即模式def.其用法如结合函数split将字符串用某模式分成多个单词:@array = split(/ /, $line); 二.匹配操作符 =~.!~ =~检验匹配是否成功:$result = $var =~ /abc/;若在该字符串中找到了该模式,则返回非零值,即true,不匹配则返回0,即false.!~则相反.这两个操作符适于条件控制中,如: 复制代码 代码如下: if ($question =~ /please/)

  • Java中反射的学习笔记分享

    目录 简介 一个简单的例子 设置使用反射 模拟instanceof运算 了解类的方法 获取有关构造函数的信息 查找类字段 按名称调用方法 创建新对象 更改字段的值 使用数组 总结 简介 反射是Java编程语言中的一个特性.它允许执行的Java程序检查或 操作 自身,并操作程序的内部属性.例如,Java类可以获取其所有成员的名称并显示它们. 从程序内部检查和操作Java类的能力听起来可能不太显示,但是在其他编程语言中,这个特性根本不存在.例如,在C或C ++ 程序中无法获取有关该程序中定义的函数的

  • Lua中的table学习笔记

    table 在 Lua 里是一种重要的数据结构,它可以说是其他数据结构的基础,通常的数组.记录.线性表.队列.集合等数据结构都可以用 table 来表示,甚至连全局变量(_G).模块.元表(metatable)等这些重要的 Lua 元素都是 table 的结构.可以说,table  是一个强大而又神奇的东西. table 特性 在之前介绍 Lua 数据类型时,也说过了 table 的一些特性,简单列举如下(详情可查看之前的介绍): 1.table是一个"关联数组",数组的索引可以是数字

  • Python中的类学习笔记

    Python中的类学习笔记

    Python使用中面向对象的语言,支持继承.多态: 定义一个Person类: 复制代码 代码如下: >>> class Person: ... def sayHello(self): ... print('hello') ... >>> Person.sayHello(None) hello >>> Person().sayHello() hello 可以修改Person的类方法 复制代码 代码如下: >>> def hack_say

  • Lua中的闭包学习笔记

    之前介绍 Lua 的数据类型时,也提到过,Lua 的函数是一种"第一类值(First-Class Value)".它可以: 存储在变量或 table (例如模块和面向对象的实现)里 复制代码 代码如下: t = { p = print } t.p("just a test!") 作为实参(也称其为"高阶函数(higher-order function)")传递给其他函数调用 复制代码 代码如下: t = {2, 3, 1, 5, 4} table

  • Python中的异常处理学习笔记

    Python 是面向对象的语言,所以程序抛出的异常也是类. 常见的异常类 1.NameError:尝试访问一个没有申明的变量 2.ZeroDivisionError:除数为 0 3.SyntaxError:语法错误 4.IndexError:索引超出序列范围 5.KeyError:请求一个不存在的字典关键字 6.IOError:输入输出错误(比如你要读的文件不存在) 7.AttributeError:尝试访问未知的对象属性 8.TypeError:传给函数的参数类型不正确,比如给 int 函数传

  • JavaScript中this用法学习笔记

    JavaScript这门语言中,最令人迷惑的地方有三个,闭包.this.原型.针对大多数人,可以利用词法作用域等避开this的坑,但是我们不能一直生活在舒适区,要敢于打破砂锅问到底,对我们来说也是一种提升. 一.一般对this关键字的误解: 1.this指向函数自身 2.this指向函数词法作用域 我们可以看以下一段代码: function test() { test.a = 1; this.a = 2; console.log(test.a); console.log(this.a); con

随机推荐