A Method
sub age { my $self = shift; my $duration = DateTime->now - $self->{dob}; return $duration->years; }