Changeset 32920 for trunk/tools/diskspace/nebulous_data.pl

Timestamp:

Dec 9, 2011, 6:23:31 PM (15 years ago)

Author:

watersc1

Message:

Regexp matches were too greedy, which has possibly corrupted the diskspace data previously taken.

File:

• trunk/tools/diskspace/nebulous_data.pl (modified) (1 diff)

trunk/tools/diskspace/nebulous_data.pl

@@ -4 +4 @@
 use Sys::Hostname;
 use PS::IPP::Config;
-%stages = ("RAW" => '.ota',
+%stages = ("RAW" => '\.ota',
            "DIST" => 'dist',
            "DESTREAK" => 'destreak',
-           "CHIP" => '.ch.',
-           "CAMERA" => '.cm.',
-           "WARP" => '.wrp.',
-           "DIFF" => '.dif.',
-           "STACK" => '.stk.',
-           "MAGIC" => '.mgc.',
-           "DETREND" => '.det'
+           "CHIP" => '\.ch\.',
+           "CAMERA" => '\.cm\.',
+           "WARP" => '\.wrp\.',
+           "DIFF" => '\.dif\.',
+           "STACK" => '\.stk\.',
+           "MAGIC" => '\.mgc\.',
+           "DETREND" => '\.det'
     );
 
-@products = ('.log','.trace','.mdc$','.stats$',
-             '.smf$','.cmf$',
-             '.burn.tbl$','.tgz$',
-             '.b1.fits$','.b2.fits',
-             '.b1.jpg$','.b2.jpg$',
-             '.b1.jpeg$','.b2.jpeg$',
-             '.png$',
-             '.mdl.fits$','.ptn$','.psf$',
-             '.skycell$','kernel$',
-             '.mk.fits$','.mask.fits$','.wt.fits$',
-             '.exp.fits$','.num.fits$','.expwt.fits$',
-             '.fits.fz$',
-             '.fits$');
+@products = ('\.log','\.trace','\.mdc$','\.stats$',
+             '\.smf$','\.cmf$',
+             '\.burn\.tbl$','\.tgz$',
+             '\.b1\.fits$','\.b2\.fits',
+             '\.b1\.jpg$','\.b2\.jpg$',
+             '\.b1\.jpeg$','\.b2\.jpeg$',
+             '\.png$',
+             '\.mdl\.fits$','\.ptn$','\.psf$',
+             '\.skycell$','kernel$',
+             '\.mk\.fits$','\.mask\.fits$','\.wt\.fits$',
+             '\.exp\.fits$','\.num\.fits$','\.expwt\.fits$',
+             '\.fits\.fz$',
+             '\.fits$');
 
-%product_names = ('.log' => "LOG",'.trace' => "TRACE",'.mdc$' => "MDC",'.stats$' => "STATS",
-                  '.smf$' => "CATALOG",'.cmf$' => "CATALOG",
-                  '.burn.tbl$' => "BTTABLE",'.tgz$' => "BUNDLE",
-                  '.b1.fits$' => "B1FITS",'.b2.fits' => "B2FITS",
-                  '.b1.jpg$' => "B1JPG",'.b2.jpg$' => "B2JPG",
-                  '.b1.jpeg$' => "B1JPG",'.b2.jpeg$' => "B2JPG",
-                  '.png$' => "PNG",
-                  '.mdl.fits$' => "MDL",'.ptn$' => "PTN" ,'.psf$' => "PSF",
-                  '.skycell$' => "SKYCELL",'kernel$' => "KERNEL",
-                  '.mk.fits$' => "MASK",'.mask.fits$' => "MASK",'.wt.fits$' => "WEIGHT",
-                  '.exp.fits$' => "MISCFITS",'.num.fits$' => "MISCFITS",'.expwt.fits$' => "MISCFITS",
-                  '.fits.fz$' => "FITSCOMP",
-                  '.fits$' => "FITS");
+%product_names = ('\.log' => "LOG",'\.trace' => "TRACE",'\.mdc$' => "MDC",'\.stats$' => "STATS",
+                  '\.smf$' => "CATALOG",'\.cmf$' => "CATALOG",
+                  '\.burn\.tbl$' => "BTTABLE",'\.tgz$' => "BUNDLE",
+                  '\.b1\.fits$' => "B1FITS",'\.b2\.fits' => "B2FITS",
+                  '\.b1\.jpg$' => "B1JPG",'\.b2\.jpg$' => "B2JPG",
+                  '\.b1\.jpeg$' => "B1JPG",'\.b2\.jpeg$' => "B2JPG",
+                  '\.png$' => "PNG",
+                  '\.mdl\.fits$' => "MDL",'\.ptn$' => "PTN" ,'\.psf$' => "PSF",
+                  '\.skycell$' => "SKYCELL",'kernel$' => "KERNEL",
+                  '\.mk\.fits$' => "MASK",'\.mask\.fits$' => "MASK",'\.wt\.fits$' => "WEIGHT",
+                  '\.exp\.fits$' => "MISCFITS",'\.num\.fits$' => "MISCFITS",'\.expwt\.fits$' => "MISCFITS",
+                  '\.fits\.fz$' => "FITSCOMP",
+                  '\.fits$' => "FITS");
 
 my $hostname = hostname();