Select Code to Download

package Person;
use strict;
...
print Dumper $object;

package Person;
use Moose;
...
print $_->get_Name, $/ for @objects;