my $obj = Some::Class->new ();
munge_it ($obj, $data);