Changeset 28828 for trunk/ippMonitor/scripts/czartool_revert.pl
- Timestamp:
- Aug 2, 2010, 1:22:02 PM (16 years ago)
- File:
-
- 1 edited
-
trunk/ippMonitor/scripts/czartool_revert.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippMonitor/scripts/czartool_revert.pl
r28624 r28828 5 5 use Getopt::Long; 6 6 7 my $server = undef;8 7 my $task = undef; 9 8 my $onoff = undef; 10 9 11 10 GetOptions ( 12 "server|s=s" => \$server,13 11 "task|t=s" => \$task, 14 12 "onoff|o=s" => \$onoff); 15 13 16 14 my $prob = 0; 17 if (!$server) {print "ERROR: need to define a server (-s)\n"; $prob=1;}18 15 if (!$task) {print "ERROR: need to define a task (-t)\n"; $prob=1;} 19 16 if ($prob) {exit;} 20 17 21 18 if ($task eq "cam") {$task = "camera";} 19 20 my $server = undef; 21 if ($task eq "destreak" or $task eq "dist") {$server = "distribution";} 22 else {$server = "stdscience";} 22 23 23 24 my $revert = undef;
Note:
See TracChangeset
for help on using the changeset viewer.
