标题: [问题求助] perl模块问题 [打印本页]
作者: Mekel 时间: 2018-11-15 09:13 标题: perl模块问题
我在自己的模块aa.pm中引用了getopt：long，在别的脚本调用这个perl模块时该如何把所有参数传递过去？
作者: 523066680 时间: 2018-11-15 10:04
本帖最后由 523066680 于 2018-11-15 10:19 编辑
回复 1# Mekel
在 模块中要共享的变量使用 our 声明，例如官方Getopt::Long示例的三个变量- our $data = "file.dat";
- our $length = 24;
- our $verbose;
在脚本中使用 $模块名::变量名 访问
$aa::data
$aa::length
或者在 aa.pm 中建立一个函数，通过这个函数返回所有相关参数的{哈希表}。
作者: Mekel 时间: 2018-11-16 13:26
回复 2# 523066680
多谢， 参数是能够完美传递的，即使不加our，因为我原函数里有$a=shift这样的语句，写pm里就要写成$a=shift @ARGV才行
作者: 523066680 时间: 2018-11-16 14:26
本帖最后由 523066680 于 2018-11-16 14:29 编辑
回复 3# Mekel
初看描述以为是想要把自建模块里的变量往外传。
| 欢迎光临 批处理之家 (http://www.bathome.net/) |
Powered by Discuz! 7.2 |