my $class = ref( $type ) || $type; $self->{ hireDay }->setDate( @_ ); my $self = $class->SUPER::new(); [download]
In reply to A few Perl OOP questions. by Anonymous Monk