Perl解析传入参数的一种方式

本文详细介绍了如何在Perl脚本中解析输入参数,通过使用自定义子过程,实现对命令行参数的灵活处理。

如果你自己写了一个perl脚本,指定传入参数,如:xxxscript.pl -f <filename> -s <string>

则可以通过下面的代码解决:

 

#-------------------------------------------------------------------------
# 解析输入参数
sub process_args {
    while (@ARGV) {
        $a = shift @ARGV;
        if ($a eq "-h") {
            Usage();
        } elsif ($a eq "-f") {
            $file= shift @ARGV;
        } elsif ($a eq "-s") {
            $string= shift @ARGV ;
        } else {
            Usage();
        }
    }
}
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值