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

最新推荐文章于 2025-09-13 14:35:57 发布

原创最新推荐文章于 2025-09-13 14:35:57 发布 · 574 阅读

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();
        }
    }
}