Changeset 28752 for trunk/tools/roboczar.pl
- Timestamp:
- Jul 28, 2010, 4:12:14 PM (16 years ago)
- File:
-
- 1 edited
-
trunk/tools/roboczar.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/roboczar.pl
r28729 r28752 17 17 my $save_temps = 0; 18 18 19 my $czarDb = new czartool::CzarDb($czarDbName, "ippdb01", "ipp", "ipp");20 my $gpc1Db = new czartool::Gpc1Db("gpc1", "ippdb01", "ippuser", "ippuser");21 my $pantasks = new czartool::Pantasks();22 my $czarplot = new czartool::Czarplot($czarDb, "%Y%m%d-%H%M%S", "png", "~/", $save_temps);23 $czarDb->setDateFormat("%Y%m%d-%H%i%s");24 25 my @stages = ("chip", "cam", "fake", "warp", "stack", "diff", "magic", "magicDS", "dist");26 27 28 19 GetOptions ( 29 20 "period|p=s" => \$period, # TODO more Db args 30 21 "dbname|d=s" => \$czarDbName, 31 22 ); 23 24 my $czarDb = new czartool::CzarDb($czarDbName, "ippdb01", "ipp", "ipp", 0, $save_temps); # TODO last arg here is save_temps, should get as arg 25 my $gpc1Db = new czartool::Gpc1Db("gpc1", "ippdb01", "ippuser", "ippuser"); 26 my $pantasks = new czartool::Pantasks(); 27 my $czarplot = new czartool::Czarplot($czarDb, "%Y%m%d-%H%M%S", "png", "/tmp", $save_temps); 28 $czarDb->setDateFormat("%Y%m%d-%H%i%s"); 29 30 my @stages = ("chip", "cam", "fake", "warp", "stack", "diff", "magic", "magicDS", "dist"); 31 32 32 33 33 timePoll($period);
Note:
See TracChangeset
for help on using the changeset viewer.
