Keep perlcritic happy.

perl-ide · Sep 30, 2024 · 962a7b6 · 962a7b6
1 parent a3e14f5
commit 962a7b6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/t/tie.t b/t/tie.t
@@ -15,7 +15,7 @@ my ($doc) = doc(
 open my $test_data, '<', $test_data_filename
     or die "Could not open $test_data_filename: $!";
 my $expected = do {
-    local $/;
+    local $/ = undef;
     <$test_data>;
 };
 close $test_data