perl中$0，ARGV，use warnings，use stricts和die的使用

qq_21478261

于 2020-04-02 22:22:59 发布

阅读量1.6k

点赞数 1

CC 4.0 BY-SA版权

分类专栏： # 生物信息文章标签： perl

本文链接：https://blog.youkuaiyun.com/qq_21478261/article/details/105280678

生物信息专栏收录该内容

140 篇文章 ¥49.90 ¥99.00

订阅专栏

超级会员免费看

本文详细介绍了Perl编程中的几个关键概念：$0用于获取脚本名称，ARGV数组用于接收命令行参数，use warnings开启警告信息，use strict强制规范编程习惯，以及die函数用于异常处理和程序终止。通过实例展示了die的不同用法，包括如何利用$!收集错误信息，并讨论了和$!对die输出的影响。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

perl中$0，ARGV，use warnings，use stricts和die的使用

关于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依次存入脚本之后传入的参数