Eu preciso definir alguns módulos e usá-los todos no mesmo arquivo. Não, não posso alterar o requisito.

Eu gostaria de fazer algo como o seguinte:

{
    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();

No entanto, isso resulta na mensagem:

Não é possível localizar o FooObj.pm no @INC ...
Falha no início ...

Como faço para que isso funcione?