package Z;

use strict;
use Exporter;

BEGIN {
    our (@EXPORT) = qw(zProc subzProc);
    our (@ISA) = qw(Exporter);
}

use L;

sub zProc {
  print "I am zProc\n";
}

sub subzProc {
  print "I am subzProc\n";
  L::lProc();
  L::sublProc();
}
1;