my $cc = new TRIWeb::CCHandler; $cc->cc_set( 'type', $form_vars{cc_type} ); $cc->cc_set( 'number', $form_vars{cc_number} ); $cc->cc_set( 'name', $form_vars{cc_name} ); $cc->cc_set( 'expiry', $form_vars{exp_mo} . '/' . $form_vars{exp_yr} ); $cc->cc_set( 'amount', $form_vars{fee} ); $sth->execute( $form_vars{first_name}, $form_vars{last_name}, $form_vars{address_1}, $form_vars{address_2}, $form_vars{city}, $form_vars{province}, $form_vars{country}, $form_vars{postal_code}, $form_vars{phone_work}, $form_vars{ext_work}, $form_vars{phone_work2}, $form_vars{ext_work2}, $form_vars{phone_home}, $form_vars{fax}, $form_vars{email}, $form_vars{email2}, $cc->ciphertext ) ;