Constructors Revisited

• We would like Employee to inherit new from Person

        $p = Employee->new();
        $p->name('Polonius');
        $p->department('Trite Advice');

• There is no Employee::new, so this actually calls Person::new

        sub new {
          my ($class) = @_;
          bless {}, $class;
        }

• Employee->new() turns into Person::new('Employee')

• $class is Employee

• $p is an Employee as we desired

Next

Copyright © 2001 M-J. Dominus