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;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 /:/;

• 0
• 0
• 0
• 0
• 0