Changeset 28779
- Timestamp:
- 2013-12-18T13:02:19+13:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gs2-extensions/parallel-building/trunk/src/perllib/parallelbuildinginexport.pm
r28778 r28779 57 57 my $end_time = [&gettimeofday()]; 58 58 my $duration = tv_interval($start_time, $end_time); 59 print &makeHeader('Parallel Import Complete') . "\n"; 60 print ' Ended: ' . @{$end_time}[0] . '.' . @{$end_time}[1] . "\n"; 59 61 print ' Duration: ' . sprintf('%0.6f', $duration) . "\n"; 62 print '=' x 80 . "\n"; 60 63 } 61 64 } … … 137 140 print ' Workers: ' . $self->{'workers'} . "\n"; 138 141 print ' Batchsize: ' . $self->{'batchsize'} . "\n"; 139 print '=' x 79. "\n";142 print '=' x 80 . "\n"; 140 143 if (!$self->{'removeold'}) 141 144 { … … 347 350 # 348 351 # @param $msg The message to center as a string 349 # @param $length The desired length of string - defaults to 79352 # @param $length The desired length of string - defaults to 80 350 353 # @return A string centered with '=' as padding 351 354 # … … 355 358 if (!defined $length) 356 359 { 357 $length = 79; # 80 with newline360 $length = 80; 358 361 } 359 362 my $filler_length = ($length - 2 - length($msg)) / 2; 360 363 my $filler = '=' x $filler_length; 361 if (length($msg) % 2 == 0)364 if (length($msg) % 2 == 1) 362 365 { 363 366 $msg = $filler . ' ' . $msg . ' =' . $filler;
Note:
See TracChangeset
for help on using the changeset viewer.