my $skip= Dog->new;