mirror of
https://github.com/percona/percona-toolkit.git
synced 2025-10-19 08:56:34 +00:00
Remove trailing spaces (#665)
* Remove trailing spaces * PR-665 - Remove trailing spaces - Updated not stable test t/pt-online-schema-change/preserve_triggers.t - Updated utilities in bin directory * PR-665 - Remove trailing spaces - Fixed typos * PR-665 - Remove trailing spaces - Fixed typos --------- Co-authored-by: Sveta Smirnova <sveta.smirnova@percona.com>
This commit is contained in:
@@ -46,7 +46,7 @@ use constant MAX_STRING_LENGTH => 10;
|
||||
{ local $EVAL_ERROR; eval { require ReportFormatter } };
|
||||
|
||||
# Sub: new
|
||||
#
|
||||
#
|
||||
# Parameters:
|
||||
# %args - Required arguments
|
||||
#
|
||||
@@ -171,7 +171,7 @@ sub print_reports {
|
||||
my $last_report;
|
||||
|
||||
foreach my $report ( @$reports ) {
|
||||
PTDEBUG && _d('Printing', $report, 'report');
|
||||
PTDEBUG && _d('Printing', $report, 'report');
|
||||
my $report_output = $self->$report(%args);
|
||||
if ( $report_output ) {
|
||||
print "\n"
|
||||
@@ -306,7 +306,7 @@ sub header {
|
||||
my $store = $results->{globals}->{$attrib};
|
||||
my $metrics = $ea->stats()->{globals}->{$attrib};
|
||||
my $func = $attrib =~ m/time|wait$/ ? \µ_t : \&shorten;
|
||||
my @values = (
|
||||
my @values = (
|
||||
@{$store}{qw(sum min max)},
|
||||
$store->{sum} / $store->{cnt},
|
||||
@{$metrics}{qw(pct_95 stddev median)},
|
||||
@@ -327,7 +327,7 @@ sub header {
|
||||
next unless exists $results->{globals}->{$attrib};
|
||||
|
||||
my $store = $results->{globals}->{$attrib};
|
||||
if ( $store->{sum} > 0 ) {
|
||||
if ( $store->{sum} > 0 ) {
|
||||
push @result,
|
||||
sprintf $self->{bool_format},
|
||||
$self->make_label($attrib), $self->bool_percents($store);
|
||||
@@ -476,7 +476,7 @@ sub query_report {
|
||||
|
||||
my $partitions_msg = $self->{no_partitions} ? '' : '/*!50100 PARTITIONS*/';
|
||||
if ( $groupby eq 'fingerprint' ) {
|
||||
# Shorten it if necessary (issue 216 and 292).
|
||||
# Shorten it if necessary (issue 216 and 292).
|
||||
my $samp_query = $qr->shorten($vals->{samp_query}, $self->{options}->{shorten})
|
||||
if $self->{options}->{shorten};
|
||||
|
||||
@@ -503,12 +503,12 @@ sub query_report {
|
||||
$report .= "$samp_query${mark}\n";
|
||||
}
|
||||
else {
|
||||
$report .= "# EXPLAIN $partitions_msg\n$samp_query${mark}\n";
|
||||
$report .= "# EXPLAIN $partitions_msg\n$samp_query${mark}\n";
|
||||
$report .= $self->explain_report($samp_query, $vals->{default_db});
|
||||
}
|
||||
}
|
||||
else {
|
||||
$report .= "$samp_query${mark}\n";
|
||||
$report .= "$samp_query${mark}\n";
|
||||
my $converted = $qr->convert_to_select($samp_query);
|
||||
if ( $converted
|
||||
&& $converted =~ m/^[\(\s]*select/i ) {
|
||||
@@ -867,7 +867,7 @@ sub profile {
|
||||
$qr->distill($samp_query, %{$args{distill_args}}) : $item,
|
||||
id => $groupby eq 'fingerprint' ? make_checksum($item) : '',
|
||||
vmr => ($query_time->{stddev}**2) / ($query_time->{avg} || 1),
|
||||
);
|
||||
);
|
||||
|
||||
push @profiles, \%profile;
|
||||
}
|
||||
@@ -1006,7 +1006,7 @@ sub prepared {
|
||||
}
|
||||
|
||||
push @prepared, {
|
||||
prep_r => $prep_r,
|
||||
prep_r => $prep_r,
|
||||
prep_cnt => $prep_cnt,
|
||||
exec_r => $exec_r,
|
||||
exec_cnt => $exec_cnt,
|
||||
@@ -1057,7 +1057,7 @@ sub make_global_header {
|
||||
my ( $self ) = @_;
|
||||
my @lines;
|
||||
|
||||
# First line:
|
||||
# First line:
|
||||
# Attribute total min max avg 95% stddev median
|
||||
push @lines,
|
||||
sprintf $self->{num_format}, "Attribute", '', @{$self->global_headers()};
|
||||
@@ -1140,7 +1140,7 @@ sub bool_percents {
|
||||
# Does pretty-printing for lists of strings like users, hosts, db.
|
||||
sub format_string_list {
|
||||
my ( $self, $attrib, $vals, $class_cnt ) = @_;
|
||||
|
||||
|
||||
# Only class result values have unq. So if unq doesn't exist,
|
||||
# then we've been given global values.
|
||||
if ( !exists $vals->{unq} ) {
|
||||
|
Reference in New Issue
Block a user