use constant FIELDS => qw(
result_code authorization error_message
receipt_number sales_number
+ date
card_type
avs_response cvv2_response
total_amount
error_message => 'Test Approved',
receipt_number => '1096019995.5012',
sales_number => 0,
+ date => '2003/12/17 09:59:58',
card_type => undef,
avs_response => undef,
cvv2_response => undef,
error_message => 'Real error message',
receipt_number => '1096021915.5853',
sales_number => 729,
+ date => '2003/12/17 10:31:58',
card_type => 'Visa',
avs_response => undef,
cvv2_response => undef,