Perl基础知识大全 |
您所在的位置:网站首页 › perl介绍 › Perl基础知识大全 |
Perl基础知识大全 ![]() 2010-07-16 关注 关注本文和大家重点讨论一下Perl的概念,Perl是一种文本处理语言,现在Perl提供了大量的模块集。Perl是:一种核心且及其灵活的语言,一套已安装的模块。下面请看本文有关Perl内容详细介绍。 Perl基础知识 1,Perl介绍(1)刚开始时Perl是一种文本处理语言,是一种理想的编写商业报告、完成系统管理工作以及处理html表单的语言。现在Perl提供了大量的模块集。Perl是:一种核心且及其灵活的语言一套已安装的模块CPAN——一个包含上千个有用模块的库在线模块文档 (2)在线文档》perldocperl查看函数:perldoc-t-fjoin打印文档,Perl以POD的形式保存文档,可以方便转成其他多种格式,例如:perldoc-usubject|pod2html>file.html (3)安装模块windows下使用ppm:ppminstalltk 2,Perl基础知识 (1)helloworld.plusestrict;//打开严格语法和变量检查usewarnings;//打开附加编译和运行时的警告print"helloworld\n";//打印信息 运行方式,命令行下:perlhelloworld.pl (2)变量和简单表达式只有一种变量,字符串 定义变量:my$size=42;#这是注释my表示局部变量,42实际上是“42” 如果变量没有初始化,就被赋予一个特殊值undef,对undef进行比较、打印或算术运算会出错。 (3)打印变量:print"size=$size"会打印出size=42;如果要打印"$",需要转义 perl也有printf,类似c语言,不过只在需要精确控制变量格式的地方才使用,比如:printf"%3d:%-20s%5.2f\n",$sequence,$description,$amount; (4)运算符和c一样,多的有:.:字符串连接**:乘幂x:重复,比如:my$no="no"x3; (5)引用规则如果输出的字符串后面还有字符,需要用大括号分隔,例如:my$title="$name\t${size}inches" 如果不希望Perl窜改你的字符串,则要使用单引号。Perl不会解释单引号内的东西,除非\'和\\ (6)数字常量与c相同,包括八进制和十六进制,数字中还允许使用下划线,例如:my$cost=1_333_832; (7)读取输入从标准输入读取输入:$variable=;(stdin也可以全小写)将读取整行,直到新行,包括你的回车。 chomp($name),可以去掉字符串末尾的新行 (8)if语句和关系运算符例如:if($size==1){ }elsif($size==2){//注意不是elseif }else{die("错误");//打印错误消息并退出} 关系运算符分别有用于数字和字符串的:数字字符串==eq!=ne=ge 如果字符串用了数字的关系运算,会将字符串转换为0,会显示一个警告 (9)测试变量是否有值defined($value)取消定义变量undef($value) (10)真的定义false:未定义变量,空字符串,值“0”true:其他情况 (11)循环语句while(condition){last;//退出循环,类似c中的break}for($i=0;$i”是一个特殊字符,表示要写入printOUT_FILE"hello\n" 3,Perl数组 Perl中所有Perl数组变量都以@开头 (1)基本Perl数组定义和使用my@list=("a","b","c");$list[0],$list[1],$list[2],下标从0开始 Perl数组中元素个数:$#array_name,返回Perl数组中最后一个变量的索引=Perl数组元素个数-1空Perl数组$#array_name=-1 Perl数组表达式:@array=(1,$data,"sam");@array_dest=@array_source;@full_message=($prefix1,$prefix2,@message);//在message前面加了两个元素,赋值full_message 打印Perl数组:print“@array”,打印结果中间用空格分隔,去掉双引号,中间没有分隔 带有“黑洞”的Perl数组:如果Perl数组中有没有赋值的元素,则为undef,例如:my@array=(1);$array[5]=4;//中间的几个下标对应的都是undef 引用词运算符qw:my@array=qw(tomdickharry);//中间除了空格没有其他分隔符相当于my@array=("tom","dick","harry"); (2)一些Perl数组相关函数:push(@array,$value):向结尾添加一个元素 pop(@array):取走最后的元素并返回 unshift(@array,$value):在Perl数组起始添加一个元素 shift(@array)或者shift@array:取走第一个元素并返回(函数都可以省略括号) (3)处理Perl数组的一部分:可以用一套索引,例如:my@new_array=@array[1,3,5];@array[1,0]=@array[0,1]; 范围运算符,例如:@arry[0..9]=((0)x10);//重复10次0 (4)splice函数splice可以删除或者替换Perl数组的一部分,格式为:splice@array,$offfset//删除从offset开始到末尾,offset为下标,offset为负数则从结尾算起例如:my@array=(0,1,2,3,4,5);splice(@array,-2);将得到0123 splice会返回最后删除的函数。 splice另一种形式:splice@array,$offset,$length,删除length个元素 第三种形式:splice@array$offset,$length,REPLACEMENTS删掉后,从offset开始添加REPLACEMENTS里的元素,REPLACEMENTS可以是标量或者Perl数组 (5)split和join函数@array=splitRegExpr,$string//将$string按照RegExpr指定的分隔符来分解放到@array中 $string=join$union,@array//将@array中元素用$union连接,赋值给@string (6)Perl数组排序sort函数,默认按照ASCII顺序排序:my@sorted=sort@array; perl 变量 |
今日新闻 |
推荐新闻 |
CopyRight 2018-2019 办公设备维修网 版权所有 豫ICP备15022753号-3 |