1From ca70a73bb147549e62e74751d924b1dbb59d1707 Mon Sep 17 00:00:00 2001
2From: Stig Palmquist <stig@stig.io>
3Date: Thu, 5 Jun 2025 03:45:50 +0200
4Subject: [PATCH] Fix CVE-2011-10007
5
6---
7 lib/File/Find/Rule.pm | 2 +-
8 1 file changed, 1 insertion(+), 1 deletion(-)
9
10diff --git a/lib/File/Find/Rule.pm b/lib/File/Find/Rule.pm
11index feccc76..d4dc475 100644
12--- a/lib/File/Find/Rule.pm
13+++ b/lib/File/Find/Rule.pm
14@@ -420,7 +420,7 @@ sub grep {
15
16 $self->exec( sub {
17 local *FILE;
18- open FILE, $_ or return;
19+ open FILE, '<', $_ or return;
20 local ($_, $.);
21 while (<FILE>) {
22 for my $p (@pattern) {
23--
242.49.0
25