perl 模块从未导入的包中调用方法

Question

今天我惊讶地发现我的一个 perl 模块使用了另一个模块，但没有导入它。

但是，当我意识到这从未引起任何问题时，我感到震惊！< /b>

代码类似于：

package This;
# no import for OTHER !!

sub new {
    ... implementation ...
    my $something = OTHER->new(@arguments); # no error!
    ... more implementation ...
}

那么什么给出？ This 的导入中没有一个 import OTHER ——这是我做的第一件事检查过。

是否如果导入This的代码也导入了OTHER，那么OTHER也可用于This ？

---

问题澄清：

• X、Y 和 Z 是模块。
• 在 X 中：使用 Y;
• 在 X 中：使用 Z;
• Y 不 使用 Z

Y是否可以访问Z中的函数和方法>（反之亦然）？

Answer 1

您对“导入”一词的使用有点误导。

Y 是否可以在不导入 Z 的情况下访问它（反之亦然）？

是的，或多或少。 使用模块只是将其加载到当前脚本中；所有use模块都加载到同一个脚本中，因此可以互相看到（前提是它们以正确的顺序use）。

但真正的导入——模块实际上导出的东西，以便它们被复制到使用模块的命名空间中-仅被复制到use模块的命名空间中。

例如，考虑这个 Perl 脚本：

use Time::HiRes 'time';

package Foo;

sub time1() { return time(); } # calls the built-in time() function
sub time2() { return Time::HiRes::time(); }


package main;

print Foo::time1(), "\n"; # prints (e.g.) 1323048440
print Foo::time2(), "\n"; # prints (e.g.) 1323048440.80571
print time(), "\n";       # prints (e.g.) 1323048440.8061

它使用Time::HiRes模块，并告诉它导出Time::HiRes::time > 进入当前命名空间（主命名空间），覆盖内置时间。 （Time::HiRes::time 类似于 time，但它具有亚秒级分辨率；它会给出类似 1323048440.80571 的内容，而不是只是 1323048440。）因此包 Foo 可以看到 Time::HiRes 以及其中的任何内容Time::HiRes，如其时间；但它必须通过显式编写 Time::HiRes::time 来明确指定。

（注意：为了简化描述，我将上面的内容写为单个脚本，但是当在 Foo.pm 中定义 Foo 并使用 加载时，也会发生同样的情况使用 Foo;。）

Answer 2

是的，至少当您使用间接包和对象语法时。从像

OtherPackage->method()
$anOtherPackageObject->method()

Perl 这样的调用可以解析完全限定的子例程名称（在上述两种情况下都是&OtherPackage::method）并从任何地方调用子例程。