From 0cb6a24bb57177a3d4a74c30a0a37995a384bf4d Mon Sep 17 00:00:00 2001 From: James E Keenan Date: Wed, 23 Apr 2025 17:46:39 -0400 Subject: [PATCH] Executing this test file leaves a temporary file in /tmp. File::Temp::tempfile() takes 'UNLINK'. ('CLEANUP' is associated with File::Temp::tempdir().) As noted by Sevan Janiyn, this has already been fixed upstream, but a new CPAN release of Encode has not yet been issued. Fixes: https://github.com/Perl/perl5/issues/23221 --- cpan/Encode/t/Unicode_trailing_nul.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/cpan/Encode/t/Unicode_trailing_nul.t b/cpan/Encode/t/Unicode_trailing_nul.t index a212599619d3..0b2a18be1191 100644 --- a/cpan/Encode/t/Unicode_trailing_nul.t +++ b/cpan/Encode/t/Unicode_trailing_nul.t @@ -16,7 +16,7 @@ use File::Spec; my $foo = Encode::decode("UTF-16LE", "/\0v\0a\0r\0/\0f\0f\0f\0f\0f\0f\0/\0u\0s\0e\0r\0s\0/\0s\0u\0p\0e\0r\0m\0a\0n\0"); -my ($fh, $path) = File::Temp::tempfile( CLEANUP => 1 ); +my ($fh, $path) = File::Temp::tempfile( UNLINK => 1 ); note "temp file: $path";