/[BackupPC]/trunk/bin/BackupPC_xls_report
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/bin/BackupPC_xls_report

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 42 by dpavlin, Fri Aug 19 22:07:01 2005 UTC revision 68 by dpavlin, Mon Aug 22 09:46:57 2005 UTC
# Line 48  my $date_format = $workbook->add_format( Line 48  my $date_format = $workbook->add_format(
48  my $duration_format = $workbook->add_format(num_format => 'hh:mm:ss');  my $duration_format = $workbook->add_format(num_format => 'hh:mm:ss');
49  my $header_format = $workbook->add_format(color => 'gray');  my $header_format = $workbook->add_format(color => 'gray');
50  my $pcnt_format = $workbook->add_format(num_format => '0.0%');  my $pcnt_format = $workbook->add_format(num_format => '0.0%');
51  my $size_format = $workbook->add_format(num_format => '0');  my $size_format = $workbook->add_format(num_format => '#0');
52    
53  my $formats = {  my $formats = {
54          duration => $duration_format,          duration => $duration_format,
# Line 67  my $TopDir = $bpc->TopDir(); Line 67  my $TopDir = $bpc->TopDir();
67    
68  my $hosts = $bpc->HostInfoRead();  my $hosts = $bpc->HostInfoRead();
69    
70  foreach my $host_key (keys %{$hosts}) {  foreach my $host_key (sort keys %{$hosts}) {
71    
72          my $hostname = $hosts->{$host_key}->{'host'} || die "can't find host for $host_key";          my $hostname = $hosts->{$host_key}->{'host'} || die "can't find host for $host_key";
73    
Legend:
Removed from v.42  
changed lines
  Added in v.68
  ViewVC Help
Powered by ViewVC 1.1.26