<?xml version="1.0" encoding="UTF-8"?>
<cvrfdoc xmlns="http://www.icasi.org/CVRF/schema/cvrf/1.1" xmlns:cvrf="http://www.icasi.org/CVRF/schema/cvrf/1.1">
	<DocumentTitle xml:lang="en">An update for perl is now available for openEuler-20.03-LTS-SP4,openEuler-22.03-LTS-SP3,openEuler-22.03-LTS-SP4,openEuler-24.03-LTS,openEuler-24.03-LTS-SP1</DocumentTitle>
	<DocumentType>Security Advisory</DocumentType>
	<DocumentPublisher Type="Vendor">
		<ContactDetails>openeuler-security@openeuler.org</ContactDetails>
		<IssuingAuthority>openEuler security committee</IssuingAuthority>
	</DocumentPublisher>
	<DocumentTracking>
		<Identification>
			<ID>openEuler-SA-2025-1631</ID>
		</Identification>
		<Status>Final</Status>
		<Version>1.0</Version>
		<RevisionHistory>
			<Revision>
				<Number>1.0</Number>
				<Date>2025-06-13</Date>
				<Description>Initial</Description>
			</Revision>
		</RevisionHistory>
		<InitialReleaseDate>2025-06-13</InitialReleaseDate>
		<CurrentReleaseDate>2025-06-13</CurrentReleaseDate>
		<Generator>
			<Engine>openEuler SA Tool V1.0</Engine>
			<Date>2025-06-13</Date>
		</Generator>
	</DocumentTracking>
	<DocumentNotes>
		<Note Title="Synopsis" Type="General" Ordinal="1" xml:lang="en">perl security update</Note>
		<Note Title="Summary" Type="General" Ordinal="2" xml:lang="en">An update for perl is now available for openEuler-20.03-LTS-SP4,openEuler-22.03-LTS-SP3,openEuler-22.03-LTS-SP4,openEuler-24.03-LTS,openEuler-24.03-LTS-SP1</Note>
		<Note Title="Description" Type="General" Ordinal="3" xml:lang="en">Perl 5 is a highly capable, feature-rich programming language with over 30 years of development. Perl 5 runs on over 100 platforms from portables to mainframes and is suitable for both rapid prototyping and large scale development projects.

Security Fix(es):

Perl threads have a working directory race condition where file operations may target unintended paths.

If a directory handle is open at thread creation, the process-wide current working directory is temporarily changed in order to clone that handle for the new thread, which is visible from any third (or more) thread already running. 

This may lead to unintended operations such as loading code or accessing files from unexpected locations, which a local attacker may be able to exploit.

The bug was introduced in commit 11a11ecf4bea72b17d250cfb43c897be1341861e and released in Perl version 5.13.6(CVE-2025-40909)</Note>
		<Note Title="Topic" Type="General" Ordinal="4" xml:lang="en">An update for perl is now available for openEuler-20.03-LTS-SP4,openEuler-22.03-LTS-SP3,openEuler-22.03-LTS-SP4,openEuler-24.03-LTS,openEuler-24.03-LTS-SP1.

openEuler Security has rated this update as having a security impact of medium. A Common Vunlnerability Scoring System(CVSS)base score,which gives a detailed severity rating, is available for each vulnerability from the CVElink(s) in the References section.</Note>
		<Note Title="Severity" Type="General" Ordinal="5" xml:lang="en">Medium</Note>
		<Note Title="Affected Component" Type="General" Ordinal="6" xml:lang="en">perl</Note>
	</DocumentNotes>
	<DocumentReferences>
		<Reference Type="Self">
			<URL>https://www.openeuler.org/zh/security/security-bulletins/detail/?id=openEuler-SA-2025-1631</URL>
		</Reference>
		<Reference Type="openEuler CVE">
			<URL>https://www.openeuler.org/en/security/cve/detail/?cveId=CVE-2025-40909</URL>
		</Reference>
		<Reference Type="Other">
			<URL>https://nvd.nist.gov/vuln/detail/CVE-2025-40909</URL>
		</Reference>
	</DocumentReferences>
	<ProductTree xmlns="http://www.icasi.org/CVRF/schema/prod/1.1">
		<Branch Type="Product Name" Name="openEuler">
			<FullProductName ProductID="openEuler-20.03-LTS-SP4" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">openEuler-20.03-LTS-SP4</FullProductName>
			<FullProductName ProductID="openEuler-22.03-LTS-SP3" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">openEuler-22.03-LTS-SP3</FullProductName>
			<FullProductName ProductID="openEuler-22.03-LTS-SP4" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">openEuler-22.03-LTS-SP4</FullProductName>
			<FullProductName ProductID="openEuler-24.03-LTS" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">openEuler-24.03-LTS</FullProductName>
			<FullProductName ProductID="openEuler-24.03-LTS-SP1" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">openEuler-24.03-LTS-SP1</FullProductName>
		</Branch>
		<Branch Type="Package Arch" Name="aarch64">
			<FullProductName ProductID="perl-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-5.28.3-11.oe2003sp4.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-debuginfo-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-debuginfo-5.28.3-11.oe2003sp4.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-debugsource-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-debugsource-5.28.3-11.oe2003sp4.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-devel-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-devel-5.28.3-11.oe2003sp4.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-libs-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-libs-5.28.3-11.oe2003sp4.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-5.34.0-16.oe2203sp3.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-debuginfo-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-debuginfo-5.34.0-16.oe2203sp3.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-debugsource-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-debugsource-5.34.0-16.oe2203sp3.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-devel-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-devel-5.34.0-16.oe2203sp3.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-libs-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-libs-5.34.0-16.oe2203sp3.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-5.34.0-14.oe2203sp4.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-debuginfo-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-debuginfo-5.34.0-14.oe2203sp4.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-debugsource-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-debugsource-5.34.0-14.oe2203sp4.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-devel-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-devel-5.34.0-14.oe2203sp4.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-libs-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-libs-5.34.0-14.oe2203sp4.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-5.38.0-10.oe2403.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-debuginfo-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-debuginfo-5.38.0-10.oe2403.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-debugsource-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-debugsource-5.38.0-10.oe2403.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-devel-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-devel-5.38.0-10.oe2403.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-libs-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-libs-5.38.0-10.oe2403.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-5.38.0-10.oe2403sp1.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-debuginfo-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-debuginfo-5.38.0-10.oe2403sp1.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-debugsource-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-debugsource-5.38.0-10.oe2403sp1.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-devel-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-devel-5.38.0-10.oe2403sp1.aarch64.rpm</FullProductName>
			<FullProductName ProductID="perl-libs-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-libs-5.38.0-10.oe2403sp1.aarch64.rpm</FullProductName>
		</Branch>
		<Branch Type="Package Arch" Name="src">
			<FullProductName ProductID="perl-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-5.28.3-11.oe2003sp4.src.rpm</FullProductName>
			<FullProductName ProductID="perl-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-5.34.0-16.oe2203sp3.src.rpm</FullProductName>
			<FullProductName ProductID="perl-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-5.34.0-14.oe2203sp4.src.rpm</FullProductName>
			<FullProductName ProductID="perl-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-5.38.0-10.oe2403.src.rpm</FullProductName>
			<FullProductName ProductID="perl-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-5.38.0-10.oe2403sp1.src.rpm</FullProductName>
		</Branch>
		<Branch Type="Package Arch" Name="x86_64">
			<FullProductName ProductID="perl-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-5.28.3-11.oe2003sp4.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-debuginfo-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-debuginfo-5.28.3-11.oe2003sp4.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-debugsource-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-debugsource-5.28.3-11.oe2003sp4.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-devel-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-devel-5.28.3-11.oe2003sp4.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-libs-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-libs-5.28.3-11.oe2003sp4.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-5.34.0-16.oe2203sp3.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-debuginfo-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-debuginfo-5.34.0-16.oe2203sp3.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-debugsource-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-debugsource-5.34.0-16.oe2203sp3.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-devel-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-devel-5.34.0-16.oe2203sp3.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-libs-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-libs-5.34.0-16.oe2203sp3.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-5.34.0-14.oe2203sp4.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-debuginfo-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-debuginfo-5.34.0-14.oe2203sp4.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-debugsource-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-debugsource-5.34.0-14.oe2203sp4.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-devel-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-devel-5.34.0-14.oe2203sp4.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-libs-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-libs-5.34.0-14.oe2203sp4.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-5.38.0-10.oe2403.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-debuginfo-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-debuginfo-5.38.0-10.oe2403.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-debugsource-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-debugsource-5.38.0-10.oe2403.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-devel-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-devel-5.38.0-10.oe2403.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-libs-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-libs-5.38.0-10.oe2403.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-5.38.0-10.oe2403sp1.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-debuginfo-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-debuginfo-5.38.0-10.oe2403sp1.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-debugsource-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-debugsource-5.38.0-10.oe2403sp1.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-devel-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-devel-5.38.0-10.oe2403sp1.x86_64.rpm</FullProductName>
			<FullProductName ProductID="perl-libs-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-libs-5.38.0-10.oe2403sp1.x86_64.rpm</FullProductName>
		</Branch>
		<Branch Type="Package Arch" Name="noarch">
			<FullProductName ProductID="perl-help-5.28.3-11" CPE="cpe:/a:openEuler:openEuler:20.03-LTS-SP4">perl-help-5.28.3-11.oe2003sp4.noarch.rpm</FullProductName>
			<FullProductName ProductID="perl-help-5.34.0-16" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP3">perl-help-5.34.0-16.oe2203sp3.noarch.rpm</FullProductName>
			<FullProductName ProductID="perl-help-5.34.0-14" CPE="cpe:/a:openEuler:openEuler:22.03-LTS-SP4">perl-help-5.34.0-14.oe2203sp4.noarch.rpm</FullProductName>
			<FullProductName ProductID="perl-help-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS">perl-help-5.38.0-10.oe2403.noarch.rpm</FullProductName>
			<FullProductName ProductID="perl-help-5.38.0-10" CPE="cpe:/a:openEuler:openEuler:24.03-LTS-SP1">perl-help-5.38.0-10.oe2403sp1.noarch.rpm</FullProductName>
		</Branch>
	</ProductTree>
	<Vulnerability Ordinal="1" xmlns="http://www.icasi.org/CVRF/schema/vuln/1.1">
		<Notes>
			<Note Title="Vulnerability Description" Type="General" Ordinal="1" xml:lang="en">Perl threads have a working directory race condition where file operations may target unintended paths.

If a directory handle is open at thread creation, the process-wide current working directory is temporarily changed in order to clone that handle for the new thread, which is visible from any third (or more) thread already running. 

This may lead to unintended operations such as loading code or accessing files from unexpected locations, which a local attacker may be able to exploit.

The bug was introduced in commit 11a11ecf4bea72b17d250cfb43c897be1341861e and released in Perl version 5.13.6</Note>
		</Notes>
		<ReleaseDate>2025-06-13</ReleaseDate>
		<CVE>CVE-2025-40909</CVE>
		<ProductStatuses>
			<Status Type="Fixed">
				<ProductID>openEuler-20.03-LTS-SP4</ProductID>
				<ProductID>openEuler-22.03-LTS-SP3</ProductID>
				<ProductID>openEuler-22.03-LTS-SP4</ProductID>
				<ProductID>openEuler-24.03-LTS</ProductID>
				<ProductID>openEuler-24.03-LTS-SP1</ProductID>
			</Status>
		</ProductStatuses>
		<Threats>
			<Threat Type="Impact">
				<Description>Medium</Description>
			</Threat>
		</Threats>
		<CVSSScoreSets>
			<ScoreSet>
				<BaseScore>5.9</BaseScore>
				<Vector>AV:L/AC:L/PR:N/UI:N/S:U/C:L/I:L/A:L</Vector>
			</ScoreSet>
		</CVSSScoreSets>
		<Remediations>
			<Remediation Type="Vendor Fix">
				<Description>perl security update</Description>
				<DATE>2025-06-13</DATE>
				<URL>https://www.openeuler.org/zh/security/security-bulletins/detail/?id=openEuler-SA-2025-1631</URL>
			</Remediation>
		</Remediations>
	</Vulnerability>
</cvrfdoc>