如何调用我在同一个文件中定义的Perl包?

前端之家收集整理的这篇文章主要介绍了如何调用我在同一个文件中定义的Perl包?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我需要定义一些模块并将它们全部用在同一个文件中。不,我不能改变要求。

我想做一些类似如下的事情:

{
    package FooObj;

    sub new { ... }

    sub add_data { ... }
}

{
    package BarObj;

    use FooObj;

    sub new { 
        ... 
        # BarObj "has a" FooObj
        my $self = ( myFoo => FooObj->new() );
        ...
    }

    sub some_method { ... }
}

my $bar = BarObj->new();

但是,这会导致消息:

Can’t locate FooObj.pm in @INC …
BEGIN Failed

我该如何让这个工作?

解决方法

放弃使用。认真。

使用tell perl从另一个文件中读取代码,因为代码在同一个文件中,因此您不需要执行该操作。

原文链接:https://www.f2er.com/Perl/172949.html

猜你在找的Perl相关文章