package Parent;

sub identify { return name(); }

sub name { return 'Parent'; }

1;