package Daughter; # or Son
use strict;
use warnings;
use 5.010;
use parent qw(Father);
1;