#!/usr/bin/perl
use warnings;
use strict;

use lib '.';

use MyModule;

MyModule::call();

##</code><code>##

package MyModule;
use warnings;
use strict;

sub call {
    MyModule2::authorize();
}

__PACKAGE__

##</code><code>##

package MyModule2;
use warnings;
use strict;

sub authorize {
    print "auth\n";
}

__PACKAGE__

##</code><code>##

Undefined subroutine &MyModule2::authorize called at MyModule.pm line 6.

##</code><code>##

use MyModule2;