- or download this
BEGIN {
use Carp;
no strict 'refs';
*{"bbb::()"} = sub {confess};
}
- or download this
Recursive inheritance detected while looking for method '(abs' in pack
+age 'bbb'.
- or download this
(/opt/perl/lib/5.8.6/base.pm:74) Looking for method isa in pack
+age aaa
(/opt/perl/lib/5.8.6/base.pm:74) Looking for method isa in pack
+age UNIVERSAL
...
(xx:0) Looking for method DESTROY in package UNIVERSAL
(xx:0) Looking for method AUTOLOAD in package IO::Handle
(xx:0) Looking for method AUTOLOAD in package UNIVERSAL