#!/usr/bin/perl

use Data::Dumper;
use Animal::Dog;

my $rex = Animal::Dog->new();
print Dumper($rex);