- $self->infuse($response, qw(
- ReceiptNumber receipt_number
- SalesOrderNumber sales_number
- Date date
- xxxName cardholder
- CardType card_type
- Page result_code
- ApprovalCode authorization
- Verbiage error_message
- TotalAmount total_amount
- AVSResponseCode avs_response
- CVV2ResponseCode cvv2_response
- ));
+ $self->infuse($response,
+ receipt_number => 'ReceiptNumber',
+ sales_number => 'SalesOrderNumber',
+ date => 'Date',
+ cardholder => 'xxxName',
+ card_type => 'CardType',
+ result_code => 'Page',
+ authorization => 'ApprovalCode',
+ error_message => 'Verbiage',
+ total_amount => 'TotalAmount',
+ avs_response => 'AVSResponseCode',
+ cvv2_response => 'CVV2ResponseCode',
+ );