- Timestamp:
- May 12, 2023, 9:21:20 AM (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/eam/rawfix.20230221/src/update_chip_stats.pl
r42449 r42462 13 13 14 14 # USAGE: update_chip_locations.pl --dateobs (night) --stage (0,1,etc) --chiplist (file) 15 16 my ($fulldate, $dateword, $chiplist, $stage, $topdir) = &parse_cmdopts; 15 # nebulous.config & chiplist.txt are at topdir 16 17 my ($fulldate, $dateword, $chiplist, $stage, $topdir, $basedir) = &parse_cmdopts; 17 18 my ($raw_dbh) = &parse_db_config ("$topdir/nebulous.config"); 18 19 … … 38 39 foreach my $chip_id (@chip_ids) { 39 40 40 open (STATFILE, "$ topdir/$dateword/$chip_id.stats.$stage.txt");41 open (STATFILE, "$basedir/$dateword/$chip_id.stats.$stage.txt"); 41 42 my @lines = <STATFILE>; 42 43 close (STATFILE); … … 154 155 my $dateword = sprintf ("%4d%02d%02d", $date_year, $date_month, $date_day); 155 156 156 return ($fulldate, $dateword, $chiplist, $stage, $topdir); 157 my ($yearobs) = substr ($dateword, 0, 4); 158 my $basedir = "$topdir/$yearobs"; 159 160 return ($fulldate, $dateword, $chiplist, $stage, $topdir, $basedir); 157 161 } 158 162
Note:
See TracChangeset
for help on using the changeset viewer.
