freeside-cdr-sftp_and_import: add an option to gunzip imported files, RT10991
authorlevinse <levinse>
Wed, 22 Jun 2011 18:22:05 +0000 (18:22 +0000)
committerlevinse <levinse>
Wed, 22 Jun 2011 18:22:05 +0000 (18:22 +0000)
FS/bin/freeside-cdr-sftp_and_import

index e09f7dc..ab9d4a6 100755 (executable)
@@ -96,7 +96,13 @@ foreach my $filename ( @$ls ) {
  
   my $ungziped = $filename;
   my $ungziped =~ s/\.gz$//;
-  system("gunzip $cachedir/$filename") if $opt_g;
+  if ( $opt_g ) {
+      if(system('gunzip', "$cachedir/$filename") != 0) {
+        warn "gunzip of '$cachedir/$filename' failed" if $opt_v;
+        unlink "$cachedir/$filename";
+        next;
+      }
+  }
 
   my $import_options = {
     'file'            => "$cachedir/$ungziped",