Select Code to Download

package Gl::Df;

...
sub tst1 { tst2(); print 1 ;}
1;

package Gl::Uf;

...
sub tst2 { tst1();print 2 }

1;

use strict;
use warnings;
...

tst1();
tst2();

Undefined subroutine &Gl::Uf::tst1 called at Gl/Uf.pm line 14.