#!/usr/bin/env perl

use strict;
use warnings;
# Note the order ... "A" with the implicit requir'ing of "A::B" by "A" - this does NOT work
use A;

A::sub_a();
A::B::sub_b();
exit;