percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-10 05:00:45 +00:00
Code Issues Packages Projects Releases Wiki Activity

Rewrite pt-log-player player.t.

Browse Source
This commit is contained in:
Daniel Nichter
2011-07-14 11:52:13 -06:00
parent 31398457f4
commit 743f29155b
19 changed files with 25 additions and 276 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lib/PerconaTest.pm
View File

@@ -478,9 +478,10 @@ sub no_diff {
if ( my $trf = $args{trf} ) {
`$trf $tmp_file_orig > $tmp_file`;
}
if ( my $sed = $args{sed} ) {
if ( my $sed_args = $args{sed} ) {
foreach my $sed_args ( @{$args{sed}} ) {
`sed $sed_args $tmp_file`;
`cat $tmp_file | sed $sed_args > $tmp_file-2`;
`mv $tmp_file-2 $tmp_file`;
}
}
if ( defined(my $sort_args = $args{sort}) ) {