my $x = Test->new();
my $dog = \$x;
push @pack, $dog;

##</code><code>##

push @pack, Test->new();