Pod::Text versions before 6.1.1 for Perl allow CPU and memory exhaustion formatting a POD document whose =over nesting drives the margin to the output width. Each =over adds its indent to the margin, which wrap() subtracts from the output width to get the space available for text. When that space reaches zero, the line-splitting substitution matches the empty string, and the loop consumes no input while appending the margin padding on every pass. Formatting an attacker-supplied POD document never returns, and the output grows until memory is exhausted.
{
"binaries": [
{
"binary_name": "libperl5.34",
"binary_version": "5.34.0-3ubuntu1.9"
},
{
"binary_name": "perl",
"binary_version": "5.34.0-3ubuntu1.9"
},
{
"binary_name": "perl-base",
"binary_version": "5.34.0-3ubuntu1.9"
},
{
"binary_name": "perl-debug",
"binary_version": "5.34.0-3ubuntu1.9"
},
{
"binary_name": "perl-modules-5.34",
"binary_version": "5.34.0-3ubuntu1.9"
}
]
}{
"binaries": [
{
"binary_name": "libperl5.38t64",
"binary_version": "5.38.2-3.2ubuntu0.6"
},
{
"binary_name": "perl",
"binary_version": "5.38.2-3.2ubuntu0.6"
},
{
"binary_name": "perl-base",
"binary_version": "5.38.2-3.2ubuntu0.6"
},
{
"binary_name": "perl-debug",
"binary_version": "5.38.2-3.2ubuntu0.6"
},
{
"binary_name": "perl-modules-5.38",
"binary_version": "5.38.2-3.2ubuntu0.6"
}
]
}{
"binaries": [
{
"binary_name": "libperl5.40",
"binary_version": "5.40.1-7ubuntu0.3"
},
{
"binary_name": "perl",
"binary_version": "5.40.1-7ubuntu0.3"
},
{
"binary_name": "perl-base",
"binary_version": "5.40.1-7ubuntu0.3"
},
{
"binary_name": "perl-debug",
"binary_version": "5.40.1-7ubuntu0.3"
},
{
"binary_name": "perl-modules-5.40",
"binary_version": "5.40.1-7ubuntu0.3"
}
]
}{
"binaries": [
{
"binary_name": "libcgi-fast-perl",
"binary_version": "5.18.2-2ubuntu1.7+esm9"
},
{
"binary_name": "libperl5.18",
"binary_version": "5.18.2-2ubuntu1.7+esm9"
},
{
"binary_name": "perl",
"binary_version": "5.18.2-2ubuntu1.7+esm9"
},
{
"binary_name": "perl-base",
"binary_version": "5.18.2-2ubuntu1.7+esm9"
},
{
"binary_name": "perl-debug",
"binary_version": "5.18.2-2ubuntu1.7+esm9"
},
{
"binary_name": "perl-modules",
"binary_version": "5.18.2-2ubuntu1.7+esm9"
}
]
}{
"binaries": [
{
"binary_name": "libperl5.22",
"binary_version": "5.22.1-9ubuntu0.9+esm4"
},
{
"binary_name": "perl",
"binary_version": "5.22.1-9ubuntu0.9+esm4"
},
{
"binary_name": "perl-base",
"binary_version": "5.22.1-9ubuntu0.9+esm4"
},
{
"binary_name": "perl-debug",
"binary_version": "5.22.1-9ubuntu0.9+esm4"
},
{
"binary_name": "perl-modules-5.22",
"binary_version": "5.22.1-9ubuntu0.9+esm4"
}
]
}{
"binaries": [
{
"binary_name": "libperl5.26",
"binary_version": "5.26.1-6ubuntu0.7+esm4"
},
{
"binary_name": "perl",
"binary_version": "5.26.1-6ubuntu0.7+esm4"
},
{
"binary_name": "perl-base",
"binary_version": "5.26.1-6ubuntu0.7+esm4"
},
{
"binary_name": "perl-debug",
"binary_version": "5.26.1-6ubuntu0.7+esm4"
},
{
"binary_name": "perl-modules-5.26",
"binary_version": "5.26.1-6ubuntu0.7+esm4"
}
]
}{
"binaries": [
{
"binary_name": "libperl5.30",
"binary_version": "5.30.0-9ubuntu0.5+esm4"
},
{
"binary_name": "perl",
"binary_version": "5.30.0-9ubuntu0.5+esm4"
},
{
"binary_name": "perl-base",
"binary_version": "5.30.0-9ubuntu0.5+esm4"
},
{
"binary_name": "perl-debug",
"binary_version": "5.30.0-9ubuntu0.5+esm4"
},
{
"binary_name": "perl-modules-5.30",
"binary_version": "5.30.0-9ubuntu0.5+esm4"
}
]
}