perl学习笔记2

《perl学习笔记2》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、数组是一组有序排列的标量，如字符串和/或数字。数组中的各个元素由从0开始的整数来索引。数组变量名以“@”符号开头@names=("Jessica","Michelle","Linda");print"$names";#Printsthearraywithelementsseparatedbyaspaceprint"$names[0]and$names[2]";#Prints"Jessica"and"Linda"print"$names[-1]";#Prints"Linda"Perl提供了大量的预定义变量。下面列举了常用的一些预定义变

2、量：$_在执行输入和模式搜索操作时使用的默认空格变量$.文件中最后处理的当前行号$@由最近一个eval()运算符提供的Perl语法报错信息$!获取当前错误信息值，常用于die命令$0含有正在执行的程序名$$正在执行本脚本的Perl进程号$PERL_VERSION/$^VPerl解释器的版本、子版本和修订版本信息@ARGV含有命令行参数ARGV一个特殊的文件句柄，用于遍历@ARGV中出现的所有文件名@INC库文件的搜索路径@_在子例程中，@_变量含有传给该子例程的变量内容%ENV关联数组型变量%ENV含有当前环境信息%SIG关联数组型变量

3、%SIG含有指向信号内容的句柄EXAMPLE$my_year=2000;if(is_leap_year($my_year)){#Callfunctionwithanargumentprint"$my_yearisaleapyear";}else{print"$my_yearisnotaleapyear";}subis_leap_year{#Functiondefinitionmy$year=shift(@_);#Shiftofftheyearfrom#theparameterlist,@_return((($year%4==0)&&

4、($year%100!=0))

5、

6、($year%400==0))?1:0;#Whatisreturnedfromthefunction}Towritetoafile:open(FH,">file")ordie"Can'topenfile:$!";printFH"Thislineiswrittentothefilejustopened.";printFH"Andthislineisalsowrittentothefilejustopened.";[^abc]　　匹配字符既不是a又不是b也不是c的情况在命令行下传送参数。Perl

7、通过@ARGV数组保存了命令行提供的参数内容。如果用到了ARGV文件句柄，则这些命令行参数将被视为文件；否则就视为是来自命令行环境的字符串，供脚本直接使用.$response=lc($response);#responseisconvertedtolowercaseprint"Todayis$now,$name.";print'Todayis$now,$name.';TodayisSatMar2415:46:082007,Ellie.Todayis$now,$name.当字符串位于单引号之间时，print函数会把他们当作纯字符串予以输出

8、。Perl的替换符号。Perl提供了另一种表示引号的形式——即q、qq、qx和qw结构。・q代表一个单引号。・qq代表一个双引号。・qx代表一个反引号。・qw代表引用的字列表。q/Hello/‘Hello’qq/Hello/“Hello”qx/date/‘date’@list=qw/redyellowblue/;@list={‘red’,‘yellow’,‘blue’}$size=@items;将数组@items赋值给一个标量型变量$size。该标量的值将是数组中的元素个数1@grades=(90,89,78,100,87);print

9、"Theoriginalarrayis:@grades";2print"Thenumberofthelastindexis$#grades";3$#grades=3;print"Thearrayistruncatedto4elements:@grades";4@grades=();print"Thearrayiscompletelytruncated:@grades";(Output)Theoriginalarrayis:90897810087Thenumberofthelastindexis4Thearrayistru

10、ncatedto4elements:908978100Thearrayiscompletelytruncated:解释：1.把一个含有5个数字的列表赋予@grades数组。2.$#结构能够获得数组最后一个元