PERL脚本 学习笔记
            脚本专栏 发布日期:2025/10/31 浏览次数:1
         
        
            正在浏览:PERL脚本 学习笔记
            1. chomp无参数时,使用默认参数,将对$_操作。 
2. 数组@array..可用$array[number]引用。$#array..表示数组中索引数。 
3. $!包含出错信息; 
4. 默认打开文件句柄的方式是“<”即输入,“”和“>”区别就在于一个添加方式操作文件的。 
if(@ARGV < 2){ 
die “Not enough arguments\n”; 
} 
5. select LOG;改变默认句柄;在接下来的输出时不需要输入句柄参数; 
print LOG "Hello world!\n"; 
6. 重新打开一个句柄会关闭之前的文件句柄; 
7. my @k = keys %hash; my@v = values %hash返回键值或者变量值; 
hask中exists函数判断时候存在某个key,delete函数删除key和value; 
8. "."是元字符的通配符。星号("*")是匹配前一项0次或者多次(简单量词),"+"是指一个或者多个,"?"是表示出现不出现一次。 
9. "/i"大小写无关;"/s"匹配任何符号;"/x"添加空格;结合用"/is"; 
10."m//"其实代表的就是一般的模式匹配"/ /"也可以使用m(),m{},m<>..类似"qw//"。 
11.词界锚定,\b,是针对单词使用的。如/\bfred\b/可以匹配上单词fred. 
12.$1, $2 这样的名字同模式中括号对数中匹配的项目; 
13.三个特殊变量($`, $&, $')来指出是在什么地方匹配上的,分别为左中右。 
14."/s"如果不加"/g"只能执行一次; 
15.unless和if相反使用,同时可以紧接在控制修饰语后形成一条语句,elsif不是elseif,少了一个e; 
16.last和next对应别的语言的break和continue;redo不进行条件表达式的下一个循环即直接跳转到循环内容的顶部。 
17.unlink "file";rename "old","new";link "file";mkdir "file", oct("permission");rmdir "file";chmod 0755, “fred”, “barney”;chown $user, $group, glob “*.o”;utime $now, $ago, glob “*”; 
18.index..$where = index($big, $small);开头处找到,则index 返回0。如果一个字符后,则返回1,依次类推。如果子串不存在,则返回-1;rindex... 
19.$part = substr($string, $initial_position, $length); 
20.my $money = sprintf “%.2f”, 2.49997; 
21.system "date"; 
22.my(undef, $card_num, undef, undef, undef, $count) = split /:/;