目录
perl中$0,ARGV,use warnings,use stricts和die的使用
perl中$0,ARGV,use warnings,use stricts和die的使用
例如,argv.pl
#!/usr/bin/perl
use warnings; #开启该程序报错警告功能,指出错误位置和原因
use strict;#perl中编译指令,如果程序不遵守优良的编码风格(例如每一行perl语句末尾加分号;变量前加my等)则执行失败
#die 命令当程序执行错误时,退出程序报错,输出双引号中的内容
if(@ARGV != 3){
die "\tNot enough patameters!
\tperl $0 a b c\n";}
my($i,$index,$value);
foreach $i (@ARGV){
print "$i\n";};
#提取ARGV每个元素
print "\$0:$0\n";#$0为脚本本身,此处为argv.pl
while(($index,$value) = each @ARGV){#@ARGV依次存入脚本之后传入的参数
p
本文详细介绍了Perl编程中的几个关键概念:$0用于获取脚本名称,ARGV数组用于接收命令行参数,use warnings开启警告信息,use strict强制规范编程习惯,以及die函数用于异常处理和程序终止。通过实例展示了die的不同用法,包括如何利用$!收集错误信息,并讨论了
和$!对die输出的影响。

订阅专栏 解锁全文
2万+

被折叠的 条评论
为什么被折叠?



