想象一下我的脚本有这两个子
sub with_json_mod{
use JSON::Tiny;
blah blah blah;
}
sub without_json_mod{
blah blah blah;
}
我只想without_json_mod
在JSON::Tiny
没有安装时使用。
如果JSON::Tiny
未安装Perl,如何使 Perl 不失败,而是使用without_json_mod
sub ?
我试着拨打require
的with_json_mod
,它似乎工作,但是当我试着让它导入它不起作用encode_json
子在
sub with_json_mod{
require JSON::Tiny qw/encode_json/;
blah blah blah;
}
那是因为你调用require
错误。
你需要的是:
require JSON::Tiny;
JSON::Tiny -> import ( 'encode_json' );
您也可以将其包装在 'eval' 中,并测试 的值$@
:
eval { require JSON::Tiny; };
warn $@ if $@;
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句