for my $field ($object->fields) { print $object->$field(); }