Perl
_佚名-2022_
道虽迩,不行不至;事虽小,不为不成。
展开
-
Perl中use strict
use strict是Perl中编译指令,是提供给Perl编译器的指令,告诉编译器,如果perl代码中有不好的编码风格,那么提示编译失败。也就是说,加上use strict后,我们的Perl代码的编写必须遵循一些规范,否则编译器会报错。 这些规范比如有:每一行perl语句要以分号;结尾所有变量要加上my来控制变量的作用域范围...原创 2015-10-25 01:02:19 · 10303 阅读 · 0 评论 -
Perl语言中的一些特殊变量
Perl语言中定义了一些特殊的变量,通常以 $,@或%作为前缀,例如:$_、@ARGV、@INC、%ENV以及__FILE__等等。详细的内容参见:http://www.runoob.com/perl/perl-special-variables.html原创 2016-10-06 01:52:06 · 1151 阅读 · 0 评论 -
perl中标量的定义和使用
1.perl变量定义和使用perl变量定义以$开头,后面接变量表示符,例如:$var = 3 #定义变量varperl中变量使用同样以$开头,例如,$var1 = $var2 + 1备注:Perl中直接定义的变量默认都是全局变量。2.变量的作用域可以在函数或循环体中定义的变量前,加上my关键字。那么这个变量就成了就只在函数或循环体中生效了。例如:my $var原创 2015-10-25 02:12:26 · 1099 阅读 · 0 评论 -
Perl中的基本数据类型
Perl是一种弱类型语言,所以变量不需要指定类型,Perl解释器会根据上下文自动选择匹配类型。Perl有三个基本的数据类型:标量、数组、哈希。以下是这三种数据类型的说明:(1)标量标量是Perl语言中最简单的一种数据类型。这种数据类型的变量可以是数字、字符串以及浮点数,不作严格的区分。在使用时在变量的名字前面加上一个"$",表示是标量。例如:$myfirst = 123;原创 2016-10-06 01:38:46 · 1241 阅读 · 0 评论 -
perl中的BEGIN和END语句块
1.perl语言中的BEGIN和END语句块 Perl语言提供了两个关键字:BEGIN,END。它们可以分别包含一组脚本,用于程序体运行前或者运行后的执行。每个 BEGIN语句块在Perl脚本载入和编译后但在其他语句执行前执行。每个END语句块在解释器退出前执行。举例来说:#!/usr/bin/perlpackage Foo;print "Begin 和 Block 实例\n";原创 2016-10-06 01:14:21 · 3407 阅读 · 0 评论 -
perl中模块的编写和使用举例
1.perl中模块的编写和使用 这里使用一个例子来说明, 编写NinGoo模块,代码如下:#!/usr/bin/perl -wpackage NinGoo;require Exporter;use strict;use warnings;our @ISA = qw(Exporter);our @EXPORT = qw(fun_public);our @转载 2015-10-25 05:03:14 · 2656 阅读 · 0 评论 -
perl中的undef数值和defined函数
1.undef undef是perl中变量未初始化时的默认值。当这个未初始化的变量被当做整型来使用时,那么undef就是0;当这个变量被当做字符串来使用时,那么undef就是空字符串。所以当在perl中使用一个未经过初始化的变量时,程序的运行是没有问题的。 例如:$sum += 1; #该语句第一次被执行时,sum变量默认为02.defined函数原创 2015-10-25 03:22:40 · 6189 阅读 · 0 评论 -
perl中的die|warn|exit
1.die用于输出用户自定义的错误信息,并终结perl程序的执行。如,if($ret == -1){ die "ret not zero!";}输出结果为:ret not zero! at test.pl line 9.2.warn和die的用法类似,只是warn不会终结perl程序的执行。3.exit终结perl程序的执行,并返回指定原创 2015-10-25 03:07:18 · 1658 阅读 · 0 评论 -
perl的控制逻辑语句小结
1.if控制结构if(expr1){ statement;}elsif(expr2){ statement;}else{ statement;}2.while控制结构while(expr){ statement;}3.for控制结构for(初始化; 表达式; 递增){ 程序语句;}eg:for原创 2015-10-25 02:49:44 · 863 阅读 · 0 评论 -
Perl中的函数的定义和使用
1.函数的定义sub func_1 { my $var_1 = 1; print "func_1\n";}2.函数的返回值 在Perl中每一个函数都有返回值,就是调用函数时最后执行的一条语句的值。如果最后执行的是一个表达式,那么表达式的结果就是该函数的返回值。如果最后执行的是一条print语句,那么返回值是1,表示成功打印信息。原创 2015-10-25 01:08:09 · 8087 阅读 · 0 评论 -
perl中数组的定义和使用
1.数据的定义和使用方式一:$array_1[0] = "beijing";$array_1[1] = "tianjin";$array_1[2] = "chongqin";方式二:@array_2 = ("beijing", "tianjin", "chongqin");2.数据的使用@array_2 = ("beijing", "tianjin", "cho原创 2015-10-25 01:50:23 · 13090 阅读 · 0 评论 -
Perl中的正则表达式
1.Perl中的正则表达式 正则表达式(regularexpression)描述了一种字符串匹配的模式,可以用来检查一个串是否含有某种子串、将匹配的子串做替换或者从某个串中取出符合某个条件的子串等。Perl语言的正则表达式功能非常强大,基本上是常用语言中最强大的,很多语言设计正则式支持的时候都参考Perl的正则表达式。 Perl的正则表达式的三种形式,分别是匹配,替换和转转载 2016-10-06 13:51:30 · 531 阅读 · 0 评论