Subversion Repositories camp_sysinfo_client_3

Rev

Rev 81 | Rev 83 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 81 Rev 82
Line 114... Line 114...
114
   local $Data::Dumper::Purity = 1;
114
   local $Data::Dumper::Purity = 1;
115
   $Data::Dumper::Indent = 3;
115
   $Data::Dumper::Indent = 3;
116
   $Data::Dumper::Varname = '$configuration';
116
   $Data::Dumper::Varname = '$configuration';
117
   $Data::Dumper::Quotekeys = 1;
117
   $Data::Dumper::Quotekeys = 1;
118
   $Data::Dumper::Sortkeys = 1;
118
   $Data::Dumper::Sortkeys = 1;
119
   $config = Data::Dumper->Dump( [$configuration] );
119
   return Data::Dumper->Dump( [$configuration] );
120
 
120
 
121
   return $conf;
121
   return $conf;
122
   my $conf;
122
   my $conf;
123
   $conf .= "\$clientName = '" .   ( defined( $$configuration{'clientName'}   ) ? $$configuration{'clientName'}   : '' ) . "';\n";
123
   $conf .= "\$clientName = '" .   ( defined( $$configuration{'clientName'}   ) ? $$configuration{'clientName'}   : '' ) . "';\n";
124
   $conf .= "\$serialNumber = '" . ( defined( $$configuration{'serialNumber'} ) ? $$configuration{'serialNumber'} : '' ) . "';\n";
124
   $conf .= "\$serialNumber = '" . ( defined( $$configuration{'serialNumber'} ) ? $$configuration{'serialNumber'} : '' ) . "';\n";