Changeset 36231

Timestamp:

Oct 22, 2013, 12:55:52 PM (13 years ago)

Author:

watersc1

Message:

If the hostname isn't defined, set up a dummy hostname.

File:

• trunk/ippScripts/scripts/rawcheck.pl (modified) (2 diffs)

trunk/ippScripts/scripts/rawcheck.pl

@@ -81 +81 @@
 my $regtool_cmd = "$regtool -processedimfile -exp_id $exp_id -dbname $dbname";
 my ($success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 
-    run(command => $regtool_cmd, verbose => 0);
+    run(command => $regtool_cmd, verbose => 1);
 unless ($success) {
     $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
@@ -95 +95 @@
     my $hostname   = $imfile->{hostname};
     my $class_id   = $imfile->{class_id};
-    
+
+    if (!(defined($hostname))) { $hostname = 'ipp004'; }
 
 #    if (($data_state ne 'full')||($data_state ne 'compressed')) { next; } ## skip things that aren't full.