- or download this
package Foo;
...
use base 'Foo::Bar';
1;
- or download this
package Foo;
...
use base 'Foo';
print "$_ => $Foo::{$_}\n" foreach keys %Foo::;
- or download this
Bar:: => *Foo::Bar::
VERSION => *Foo::VERSION
Bar:: => *Foo::Bar::
isa => *Foo::isa
VERSION => *Foo::VERSION
- or download this
Bar:: => *Foo::Bar:: <br>
VERSION => *Foo::VERSION <br>