YAPC::2004::Israel << Previous | Index | Next >> Copyright © 2004 Gaal Yahas

Class::Accessor::Ref


     use base 'Class::Accessor::Ref';
     __PACKAGE__->mk_refaccessor(qw/PreferredCustomerStatus Discount/);
     get_customer_status_by_various_parameters(
         $job->_ref_PreferredCustomerStatus, $job->_ref_Discount,
         $cust_location, $job_location, $cust_id, $phase_of_moon);
  • You can also use $job->get_ref('PreferredCustomerStatus')