From: Alexander Moisseev <moiseev@mezonplus.ru>
Date: Thu, 6 Apr 2023 14:22:52 +0000 (+0300)
Subject: [Minor] Use a scalar variable as a dir handle
X-Git-Tag: 3.6~171^2
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=refs%2Fpull%2F4457%2Fhead;p=thirdparty%2Frspamd.git

[Minor] Use a scalar variable as a dir handle

instead of a bareword
---

diff --git a/utils/rspamd_stats.pl b/utils/rspamd_stats.pl
index e90524d203..9c5f2acb07 100755
--- a/utils/rspamd_stats.pl
+++ b/utils/rspamd_stats.pl
@@ -678,20 +678,20 @@ sub JsonObjectElt() {
 
 sub GetLogfilesList {
     my ($dir) = @_;
-    opendir( DIR, $dir ) or die $!;
+    opendir( my $fh, $dir ) or die $!;
 
     my $pattern = join( '|', keys %decompressor );
     my $re      = qr/\.[0-9]+(?:\.(?:$pattern))?/;
 
     # Add unnumbered logs first
     my @logs =
-      grep { -f "$dir/$_" && !/$re/ } readdir(DIR);
+      grep { -f "$dir/$_" && !/$re/ } readdir($fh);
 
     # Add numbered logs
-    rewinddir(DIR);
-    push( @logs, ( sort numeric ( grep { -f "$dir/$_" && /$re/ } readdir(DIR) ) ) );
+    rewinddir($fh);
+    push( @logs, ( sort numeric ( grep { -f "$dir/$_" && /$re/ } readdir($fh) ) ) );
 
-    closedir(DIR);
+    closedir($fh);
 
     # Select required logs and revers their order
     @logs =