• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    Perl模块编写说明
    Perl的语法相对来说有点晦涩,主要是一些内置变量和函数处理得相当精巧,而过于精致的东西理解起来就有点费力。相对于Shell,Perl在很多方面更加强大高效,比如Hash(关联数组)就非常好用,如果要将不同主机发出来的告警信息发送到不同的责任人,在shell中要做非常多的if或者case判断,修改起来也非常费力,而使用关联数组,则可以轻松实现该功能,代码简洁,配置方便,一个字,爽。

    Perl支持以模块对代码进行封装。著名的CPAN上就有非常多好用的Module,可以极大的减轻开发量。一个简单的模块:

    package NinGoo;
    require Exporter;
    use strict;
    use warnings;

    our @ISA     = qw(Exporter);
    our @EXPORT  = qw(fun_public); #要输出给外部调用的函数或者变量,以空格分隔
    our @version = 1.0;
    sub func_private{
      print "This is a private function";
    }

    sub func_public{
     print "Hello,world\n";
     func_private();
    }

    1;
    __END__
    模块的文件名一般以.pm做后缀,名字和package相同,也就是上面这个Module的名字为NinGoo.pm。然后在普通的.脚本中调用:

    #!/usr/bin/perl -w
    # creator: NinGoo
    # function: test perl module

    BEGIN {
        push (@INC,'/home/module');
    }

    use strict;
    use NinGoo;

    func_public();
    O'Relly出版了一系列Perl的图书,比较著名的大骆驼《Programming Perl》在这里有一个在线中文版本的,可以看看。
    作者:NinGoo  出处
    上一篇:perl后门,正向和反向!实例代码
    下一篇:用perl写的单位电脑信息采集程序
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

    Perl模块编写说明 Perl,模块,编写,说明,Perl,