trAvis - MANAGER

Edit File: Inheritance.pm

package InheritanceParent; use warnings; use strict; sub foo { 23 } use namespace::clean; sub bar { foo() } package Inheritance; use warnings; use strict; use base 'InheritanceParent'; sub baz { shift->bar } use namespace::clean; sub qux { baz(shift) } 1;