chr*_*irk -2 perl argv
我有一个perl脚本接受一个很长的选项--pager='less -R',我只想将它缩短为-p.这是一个快速入侵,我不知道perl,我假设最直接的方法是在-pager ='less -R'之前搜索和替换ARGV数组中的-p(或perl中调用的任何东西)它开始处理命令行参数.
--pager='less -R'
小智 13
看起来你肯定需要Getopt :: Long,它是核心Perl发行版的一部分.
虽然它不是一个快速的黑客,但在我看来,这是处理争论的正确方法.阅读文档,您将看到处理此类事情的速度有多快.
归档时间:
13 年,10 月 前
查看次数:
1335 次
最近记录: