use Class::MethodMaker [ new => "new", scalar => 'debug' , hash => '_returned_xml' , ]; #### use Class::MethodMaker [ new => "new", scalar => 'debug' , scalar => '_returned_xml' , ]; #### my $object = UPS::TrackedPackage->new; return $object->_returned_xml('foo'); #The set seems out of date #### my $tp = $Package->requestTrack(); #print $Package->_returned_xml(); print $tp->_returned_xml(); print Dumper($Package->_returned_xml());