diff options
| author | Anton Yuzhaninov <citrin+git@citrin.ru> | 2019-06-20 20:16:37 +0200 |
|---|---|---|
| committer | Anton Yuzhaninov <citrin+git@citrin.ru> | 2019-06-20 20:21:50 +0200 |
| commit | 93fbacc6fe590be3c5212a34fcda9b3a1c0ffcce (patch) | |
| tree | 73842990c7f3c8123f6e18d1c09da5246638dd21 /utils/rspamd_stats.pl | |
| parent | 353bef24678bf508c98aa2d86d3e662fda673a9a (diff) | |
| download | rspamd-93fbacc6fe590be3c5212a34fcda9b3a1c0ffcce.tar.gz rspamd-93fbacc6fe590be3c5212a34fcda9b3a1c0ffcce.zip | |
[Minor] Format perl scripts using current perltidy version
Diffstat (limited to 'utils/rspamd_stats.pl')
| -rwxr-xr-x | utils/rspamd_stats.pl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/utils/rspamd_stats.pl b/utils/rspamd_stats.pl index a6d603709..6d304742a 100755 --- a/utils/rspamd_stats.pl +++ b/utils/rspamd_stats.pl @@ -100,7 +100,7 @@ foreach my $s (@symbols_bidirectional) { # Deal with groups my $group_id = 0; foreach my $g (@symbols_groups) { - my @symbols = split /,/, $g; + my @symbols = split /,/, $g; my $group_name = "group$group_id"; foreach my $s (@symbols) { @@ -124,7 +124,7 @@ elsif ( -d "$log_file" ) { # Process logs foreach (@logs) { my $ext = (/[^.]+\.?([^.]*?)$/)[0]; - my $dc = $decompressor{$ext} || 'cat'; + my $dc = $decompressor{$ext} || 'cat'; open( $rspamd_log, "-|", "$dc $log_dir/$_" ) or die "cannot execute $dc $log_dir/$_ : $!"; @@ -143,7 +143,7 @@ elsif ( -d "$log_file" ) { } else { my $ext = ( $log_file =~ /[^.]+\.?([^.]*?)$/ )[0]; - my $dc = $decompressor{$ext} || 'cat'; + my $dc = $decompressor{$ext} || 'cat'; open( $rspamd_log, "-|", "$dc $log_file" ) or die "cannot execute $dc $log_file : $!"; $spinner_update_time = 0; # Force spinner update @@ -679,7 +679,7 @@ sub GetLogfilesList { opendir( DIR, $dir ) or die $!; my $pattern = join( '|', keys %decompressor ); - my $re = qr/\.[0-9]+(?:\.(?:$pattern))?/; + my $re = qr/\.[0-9]+(?:\.(?:$pattern))?/; # Add unnumbered logs first my @logs = |