Explorar o código

Merge pull request #18 from Zorrototo/master

Need the overwrite parameter for addon extraction
OwN-3m-All %!s(int64=8) %!d(string=hai) anos
pai
achega
b2ab18cc37
Modificáronse 1 ficheiros con 3 adicións e 1 borrados
  1. 3 1
      ogp_agent.pl

+ 3 - 1
ogp_agent.pl

@@ -2313,8 +2313,10 @@ sub uncompress_file_without_decrypt
 	
 	if($filesize >= 3221225472 && $file =~ /\.zip$/i){
 		# Archive::Extract seems to have problems with large zip files, so for files greater than 3GB in size, let the system handle it
-		system("unzip $file -d $destination");
+		logger "Using system call to unzip.";
+		system("unzip -o $file -d $destination");
 		if($? != 0){
+			logger "Done.";
 			return -1; 
 		}
 	}else{