# taken from: http://perldoc.perl.org/perlobj.html use strict; use warnings; use 5.014; package A; sub new { return bless {}, shift; } sub speak { my $self = shift; $self->SUPER::speak(); say 'A'; } package B; use parent 'A'; sub speak { my $self = shift; $self->SUPER::speak(); say 'B'; } package C; use parent 'B'; sub speak { my $self = shift; $self->SUPER::speak(); say 'C'; } my $c = C->new(); $c->speak(); #### Can't locate A.pm in @INC (@INC contains: E:\My Documents\Technical\Perl\Eclipse workspace\C files E:\My Documents\Technical\Perl\Eclipse workspace\OCR F:/Win7programs/Dwimperl/perl/site/lib F:/Win7programs/Dwimperl/perl/vendor/lib F:/Win7programs/Dwimperl/perl/lib .) at F:/Win7programs/Dwimperl/perl/lib/parent.pm line 20. BEGIN failed--compilation aborted at obj test.pl line 16.