open(MYTEXT,"test.txt"); #打开文件,MYTEXT为文件句柄
close(MYTEXT); #关闭文件
die函数---#在出现错误的时候停止程序的运行
读取文件
while(<MYTEXT>) #每次读一行
{
print $_;
}
写入文件
open(MYTEXT,">test.txt"); #改写方式
open(MYTEXT,">>test.txt"); #追加方式
print MYTEXT "xieruneirong","\n"; #print函数写入文件
binmode(MYTEXT); #将文件句柄标记问二进制文件
文件测试运算符---- -x filehandle或者 -x pathname
-r 可读
-w 可写
-e 存在
-z 存在,数据为空
-s 返回大小
-f 普通文件
-d 目录
-T 文本文件
-B 二进制文件
-M 返回时间
正则表达式
m// #模式匹配
. #匹配除了换行符外的任意单个字符
\n # 换行符 \r # 回车符 \t # 制表符 \f # 换页符
+ 通配至少一次
* 通配0---N次
? 通配0或1次
{n,m} 通配n到m次
.* 通配任何东西
[a-z] 匹配a,b,c,d,e中的任一字符
\w 一个单词字符
\W 一个非单词字符
\d 一个数字
\D 一个非数字
\s 一个白空间字符
\S 一个非白空间字符
^ 开头标识
$ 结尾标识
s/search/replacement/ 替换
m//i 忽略大小写
m//g 全部进行匹配
grep函数
哈希
%hash1=('apple','fruit','pear','fruit');
%hash2=('apple'=>'fruit',
'pear'=>'fruit',
)
${'apple'} 去hash数据
keys函数用来检索hash中的所有关键字
foreach $name (keys %hash1)
{
print "$name\n";
}
values函数用来检索hash中的的所有值
exists函数可以用来测试hash中是否存在某个hash关键字
如 if(exists $hash{key}){}
delete $hash{key} 删除hash关键字
函数
sub test #声明
{
my ($aa)=@_; #接收输入参数
return(1) ; #返回值
}