# CVE-2026-73194

## Summary

- **CVE ID:** CVE-2026-73194
- **Severity:** CRITICAL
- **CVSS Score:** 9.1 (CVSS:3.1/AV:N/AC:L/PR:N/UI:N/S:U/C:H/I:N/A:H)
- **CWE:** CWE-1284, CWE-787
- **Published:** Aug 15, 2026
- **Last Modified:** Aug 17, 2026

## Description

DBI versions before 1.652 for Perl allow a heap out-of-bounds write via an unvalidated numeric placeholder that sets the binder counter in preparse.

preparse reserves seven output bytes per input byte, the width of the longest ':p99999' expansion. The ':N' branch parses the number with `atoi(src)` and assigns it to the binder counter with no range check, so a statement containing ':2147483648' leaves the counter negative (-2147483648 with glibc, where atoi wraps). Each following '?' then expands through `sprintf(start, ":p%d", idx++)` to ':p-2147483648', 14 bytes with the terminating NUL where the buffer budgets 7. The placeholder limit added in 1.650 tests the counter against 99,999, which a negative counter passes.

Any caller that preparses an untrusted statement into ':pN' style placeholders gets a heap out-of-bounds write that grows with the number of '?' marks following the poisoned placeholder. The '?' and '%s' return styles compare the parsed number against the expected sequence and error out, and are unaffected.

## Affected Products

- Unknown product (0)

## References

- [CNA](https://github.com/perl5-dbi/dbi/security/advisories/GHSA-623j-hfpc-mrc4)
- [CNA](https://github.com/perl5-dbi/dbi/commit/29b72ae7d2a8114a734a55840bf1c45b89207809.patch)
- [CNA](https://www.cve.org/CVERecord?id=CVE-2026-14739)
- [CNA](https://www.cve.org/CVERecord?id=CVE-2026-10879)

## Exploitation Prediction (EPSS)

- **EPSS Score:** 0.49%
- **EPSS Percentile:** 40.6

---
_Exported from OnDuty AI Vulnerability Intelligence on 2026-09-10._