{
   "document": {
      "category": "csaf_security_advisory",
      "csaf_version": "2.0",
      "distribution": {
         "tlp": {
            "label": "WHITE",
            "url": "https://www.first.org/tlp/"
         }
      },
      "lang": "en",
      "notes": [
         {
            "category": "description",
            "text": "Perl for Windows relies on the system path environment variable to find the shell (cmd.exe). When running an executable which uses Windows Perl interpreter, Perl attempts to find and execute cmd.exe within the operating system. However, due to path search order issues, Perl initially looks for cmd.exe in the current working directory.\nAn attacker with limited privileges can exploit this behavior by placing cmd.exe in locations with weak permissions, such as C:\\ProgramData. By doing so, when an administrator attempts to use this executable from these compromised locations, arbitrary code can be executed.",
            "title": "Vulnerability Description"
         }
      ],
      "publisher": {
         "category": "other",
         "contact_details": "gdt@cpan.org",
         "name": "giterlizzi",
         "namespace": "https://github.com/giterlizzi/"
      },
      "references": [
         {
            "category": "self",
            "summary": "CPANSA-perl-2023-47039 JSON",
            "url": "https://raw.githubusercontent.com/giterlizzi/perl-CPANSA-CSAF/develop/csaf/white/2023/cpansa-perl-2023-47039.json"
         },
         {
            "category": "external",
            "summary": "https://github.com/ycdxsb/WindowsPrivilegeEscalation",
            "url": "https://github.com/ycdxsb/WindowsPrivilegeEscalation"
         },
         {
            "category": "external",
            "summary": "https://perldoc.perl.org/perl5342delta",
            "url": "https://perldoc.perl.org/perl5342delta"
         },
         {
            "category": "external",
            "summary": "https://perldoc.perl.org/perl5363delta",
            "url": "https://perldoc.perl.org/perl5363delta"
         },
         {
            "category": "external",
            "summary": "https://perldoc.perl.org/perl5381delta",
            "url": "https://perldoc.perl.org/perl5381delta"
         },
         {
            "category": "external",
            "summary": "https://perldoc.perl.org/perl5382delta",
            "url": "https://perldoc.perl.org/perl5382delta"
         },
         {
            "category": "external",
            "summary": "https://perldoc.perl.org/perl5400delta",
            "url": "https://perldoc.perl.org/perl5400delta"
         },
         {
            "category": "external",
            "summary": "CVE-2023-47039 (NVD)",
            "url": "https://nvd.nist.gov/vuln/detail/CVE-2023-47039"
         }
      ],
      "title": "perl vulnerability",
      "tracking": {
         "current_release_date": "2023-10-30T00:00:00",
         "generator": {
            "engine": {
               "name": "CSAF Perl Toolkit",
               "version": "0.26"
            }
         },
         "id": "CPANSA-perl-2023-47039",
         "initial_release_date": "2023-10-30T00:00:00",
         "revision_history": [
            {
               "date": "2023-10-30T00:00:00",
               "number": "1",
               "summary": "First release"
            }
         ],
         "status": "final",
         "version": "1"
      }
   },
   "product_tree": {
      "branches": [
         {
            "branches": [
               {
                  "category": "product_version_range",
                  "name": "vers:cpan/<5.34.2",
                  "product": {
                     "name": "perl less than 5.34.2",
                     "product_id": "CSAFPID-0001"
                  }
               },
               {
                  "category": "product_version_range",
                  "name": "vers:cpan/>=5.36.0|<5.36.3",
                  "product": {
                     "name": "perl greater than or equal 5.36.0 and less than 5.36.3",
                     "product_id": "CSAFPID-0002"
                  }
               },
               {
                  "category": "product_version_range",
                  "name": "vers:cpan/==5.38.0",
                  "product": {
                     "name": "perl equal =5.38.0",
                     "product_id": "CSAFPID-0003"
                  }
               }
            ],
            "category": "product_name",
            "name": "perl"
         }
      ]
   },
   "vulnerabilities": [
      {
         "cve": "CVE-2023-47039",
         "cwe": {
            "id": "CWE-122",
            "name": "Heap-based Buffer Overflow"
         },
         "notes": [
            {
               "category": "description",
               "text": "A vulnerability was found in Perl. This security issue occurs while Perl for Windows relies on the system path environment variable to find the shell (`cmd.exe`). When running an executable that uses the Windows Perl interpreter, Perl attempts to find and execute `cmd.exe` within the operating system. However, due to path search order issues, Perl initially looks for cmd.exe in the current working directory. This flaw allows an attacker with limited privileges to place`cmd.exe` in locations with weak permissions, such as `C:\\ProgramData`. By doing so, arbitrary code can be executed when an administrator attempts to use this executable from these compromised locations.",
               "title": "Vulnerability Description"
            }
         ],
         "product_status": {
            "known_affected": [
               "CSAFPID-0001",
               "CSAFPID-0002",
               "CSAFPID-0003"
            ]
         },
         "scores": [
            {
               "cvss_v3": {
                  "baseScore": 7.8,
                  "baseSeverity": "HIGH",
                  "vectorString": "CVSS:3.1/AV:L/AC:L/PR:L/UI:N/S:U/C:H/I:H/A:H",
                  "version": "3.1"
               },
               "products": [
                  "CSAFPID-0001",
                  "CSAFPID-0002",
                  "CSAFPID-0003"
               ]
            }
         ]
      }
   ]
}