From: ivan Date: Tue, 12 Feb 2002 23:27:38 +0000 (+0000) Subject: s/CSV/CSV_XS/g X-Git-Tag: BUSINESS_ONLINEPAYMENT_AUTHORIZENET_3_10~5 X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-OnlinePayment-AuthorizeNet.git;a=commitdiff_plain;h=7faca106dd4192ecd906949e9a4aca08b582d04b s/CSV/CSV_XS/g --- diff --git a/AuthorizeNet.pm b/AuthorizeNet.pm index 00c8962..c48808e 100644 --- a/AuthorizeNet.pm +++ b/AuthorizeNet.pm @@ -1,11 +1,11 @@ package Business::OnlinePayment::AuthorizeNet; -# $Id: AuthorizeNet.pm,v 1.2 2001-11-14 21:44:07 ivan Exp $ +# $Id: AuthorizeNet.pm,v 1.3 2002-02-12 23:27:38 ivan Exp $ use strict; use Business::OnlinePayment; use Net::SSLeay qw/make_form post_https/; -use Text::CSV; +use Text::CSV_XS; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); require Exporter; @@ -132,7 +132,7 @@ sub submit { my $t = $self->path(); my($page,$server_response,%headers) = post_https($s,$p,$t,'',$pd); - my $csv = new Text::CSV(); + my $csv = new Text::CSV_XS(); $csv->parse($page); my @col = $csv->fields();