print Data::Dumper->new([$mystuff],['mystuff'])->objectFilter(sub {
  my $obj=shift;
  return "$obj" if (ref($obj) eq 'Math::BigInt') or $obj->isa('Rose::DB::Object::Metadata');
  return $obj;
})->Dump();