X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-paymentech-download;h=16ac3c23b66c27c59b7e51bd58663aa78112f6e5;hb=fbdaf36fb33a44a453e23bc2dc8d18637b40dae9;hp=12b5c7996fa7d1008ff0d969953ed3d144cf6965;hpb=7a38228748d926503953d11eb8a5b59660e5fb20;p=freeside.git diff --git a/FS/bin/freeside-paymentech-download b/FS/bin/freeside-paymentech-download index 12b5c7996..16ac3c23b 100755 --- a/FS/bin/freeside-paymentech-download +++ b/FS/bin/freeside-paymentech-download @@ -42,7 +42,8 @@ my @batchconf = $conf->config('batchconfig-paymentech'); my $username = $batchconf[3] or die "no Paymentech batch username configured\n"; my $password = $batchconf[4] or die "no Paymentech batch password configured\n"; -my $host = ($opt_t ? 'orbitalbatchvar.paymentech.net' : 'orbitalbatch.paymentech.net'); +my $host = ($opt_t ? 'orbitalbatchvar.paymentech.net' + : 'orbitalbatch.paymentech.net'); print STDERR "Connecting to $username\@$host...\n" if $opt_v; my $sftp = Net::SFTP::Foreign->new( host => $host, @@ -67,7 +68,7 @@ BATCH: foreach my $filename (@files) { } #unzip file - system('unzip', '-P', '$password', '-q', + system('unzip', '-P', $password, '-q', "$tmpdir/${filename}_resp.zip", '-d', $tmpdir); if(! -f "$tmpdir/${filename}_resp.xml") { warn "failed to extract ${filename}_resp.xml from ${filename}_resp.zip\n";