Subversion Repositories camp_sysinfo_client_3

Rev

Rev 256 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 256 Rev 257
Line 718... Line 718...
718 
      };
 718 
      };
719 
 
 719 
 
720 
&logIt( \%configuration,  4, "Globals initialized\n" . Data::Dumper->Dump([$globals],[qw($globals)]) );
 720 
&logIt( \%configuration,  4, "Globals initialized\n" . Data::Dumper->Dump([$globals],[qw($globals)]) );
721 
 
 721 
 
722 
if ( $TESTING ) {
 722 
if ( $TESTING ) {
- 
 
 723 
   &logIt( \%configuration, 0, "Sending report to sysinfo.testing.yaml" );
723 
   open DATA, ">/tmp/sysinfo.testing.yaml" or die "Could not write to /tmp/sysinfo.testing.yaml: $!\n";
 724 
   open DATA, ">/tmp/sysinfo.testing.yaml" or die "Could not write to /tmp/sysinfo.testing.yaml: $!\n";
724 
   print DATA $out;
 725 
   print DATA $out;
725 
   close DATA;
 726 
   close DATA;
726 
} else {
 727 
} else {
727 
   # and send the results to the server
 728 
   # and send the results to the server
- 
 
 729 
   &logIt( \%configuration, 0, "Sending report to remote transport" );
728 
   if ( my $success = &sendResults( $globals, $configuration{'transports'}, $out, $configuration{'scriptDirs'} ) != 1 ) {
 730 
   if ( my $success = &sendResults( $globals, $configuration{'transports'}, $out, $configuration{'scriptDirs'} ) != 1 ) {
729 
      &logIt( \%configuration,  0, "Error $success while sending report from $configuration{'hostname'}" );
 731 
      &logIt( \%configuration,  0, "Error $success while sending report from $configuration{'hostname'}" );
730 
   }
 732 
   }
731 
}
 733 
}
732 
 
 734