diff options
Diffstat (limited to 'scripts/Test')
-rw-r--r-- | scripts/Test/Dpkg.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/Test/Dpkg.pm b/scripts/Test/Dpkg.pm index 1b1a5d67e..f0a73f8af 100644 --- a/scripts/Test/Dpkg.pm +++ b/scripts/Test/Dpkg.pm @@ -65,7 +65,7 @@ sub test_get_perl_dirs sub all_perl_files { - my $filter = shift // qr/\.(?:pl|pm|t)$/; + my $filter = shift // qr/\.(?:PL|pl|pm|t)$/; my @files; my $scan_perl_files = sub { push @files, $File::Find::name if m/$filter/; |