A->A;
# Why doesn't it just call A::A here because of inheritance?
B->A; # Not a CODE reference at noinherit.pl line 27. 
eval "print \$B::A"; # Use of uninitialized value in print at (eval 2) line 1.