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

最新推荐文章于 2023-07-02 17:28:28 发布

原创最新推荐文章于 2023-07-02 17:28:28 发布 · 532 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#json

perl 专栏收录该内容

6 篇文章

订阅专栏

本文详细介绍了如何在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();
        }
    }
}