perfsonar development work

Author: loukik
Date: 2007-05-25 09:11:07 -0400 (Fri, 25 May 2007)
New Revision: 2431

Modified:
   trunk/perfsonar-bundle/install.pl
Log:
Problem in extracting the file (actually a bug).

Fixing it now

Modified: trunk/perfsonar-bundle/install.pl
===================================================================
--- trunk/perfsonar-bundle/install.pl   2007-05-24 17:23:23 UTC (rev 2430)
+++ trunk/perfsonar-bundle/install.pl   2007-05-25 13:11:07 UTC (rev 2431)
@@ -596,7 +596,15 @@
 
     print "\nExtracting service $serviceDisplayMap{$service} installation 
files...\n\n";
 
-    if (system("gzip -d | tar -xvf $file -C $installDir") != 0){
+    if (system("gzip -d $file") != 0){
+        print "\nAn error occurred while trying to unzip the installions 
files.\n";
+        print "\nReturning to the last menu...\n";
+        return 1;
+    }
+    @arr=split /\.gz/, $file;
+       $file-unzipped = $arr[0];
+    
+       if (system("tar -xvf $file-unzipped -C $installDir") != 0){
         print "\nAn error occurred while trying to extract the installions 
files.\n";
         print "\nReturning to the last menu...\n";
         return 1;