https://bugs.koozali.org/show_bug.cgi?id=12084
--- Comment #21 from John Crisp <[email protected]> ---
Can you try this foreach section for me?
Around here - this is what it should look like. Tests OK here.
I think I had the syntax slightly wrong on the 'next if' part and thought it
wouldn't work so then changed it to the 'if' line.
728 $rpt->newval( 'Report', 'ExecutionTime', time() - $StartTime );
729 foreach my $s ( split( /[\r\n]/, $rsyncOutput ) ) {
730 next if ( $s =~ /(^rsync)|(^sent)|(^total size is)|(^File
list)/ );
731 my @p = split( /:/, $s );
732 ( my $key = $p[0] ) =~ s/\b(\w)/\U$1/g; # first char
uppercase
733 $key =~ s/ //g;
734 ( my $val = trim( $p[1] ) ) =~ s/ .*$//;
735 #### ajout AG pour enlever les virgules générées par rsync3
736 #### Remove commas generated by Rsync 3
737 $val =~ s/,//g;
738 ##### fin des modifs AG
739 $rpt->newval( 'Report', $key, $val );
740 }
741
742 $rpt->newval( 'Report', 'RootDirFilesystemUsed', $used );
--
You are receiving this mail because:
You are the QA Contact for the bug.
You are the assignee for the bug._______________________________________________
Mail for each SME Contribs bug report
To unsubscribe, e-mail [email protected]
Searchable archive at https://lists.contribs.org/mailman/public/contribteam/
