A heap buffer overflow vulnerability was discovered in Perl. Release branches 5.34, 5.36, 5.38 and 5.40 are affected, including development versions from 5.33.1 through 5.41.10. When there are non-ASCII bytes in the left-hand-side of the tr
operator, S_do_trans_invmap
can overflow the destination pointer d
. $ perl -e '$_ = "\x{FF}" x 1000000; tr/\xFF/\x{100}/;' Segmentation fault (core dumped) It is believed that this vulnerability can enable Denial of Service and possibly Code Execution attacks on platforms that lack sufficient defenses.
{ "availability": "No subscription required", "ubuntu_priority": "medium", "binaries": [ { "binary_version": "5.34.0-3ubuntu1.4", "binary_name": "libperl-dev" }, { "binary_version": "5.34.0-3ubuntu1.4", "binary_name": "libperl5.34" }, { "binary_version": "5.34.0-3ubuntu1.4", "binary_name": "perl" }, { "binary_version": "5.34.0-3ubuntu1.4", "binary_name": "perl-base" }, { "binary_version": "5.34.0-3ubuntu1.4", "binary_name": "perl-debug" }, { "binary_version": "5.34.0-3ubuntu1.4", "binary_name": "perl-doc" }, { "binary_version": "5.34.0-3ubuntu1.4", "binary_name": "perl-modules-5.34" } ] }
{ "availability": "No subscription required", "ubuntu_priority": "medium", "binaries": [ { "binary_version": "5.38.2-5ubuntu0.1", "binary_name": "libperl-dev" }, { "binary_version": "5.38.2-5ubuntu0.1", "binary_name": "libperl5.38t64" }, { "binary_version": "5.38.2-5ubuntu0.1", "binary_name": "perl" }, { "binary_version": "5.38.2-5ubuntu0.1", "binary_name": "perl-base" }, { "binary_version": "5.38.2-5ubuntu0.1", "binary_name": "perl-debug" }, { "binary_version": "5.38.2-5ubuntu0.1", "binary_name": "perl-doc" }, { "binary_version": "5.38.2-5ubuntu0.1", "binary_name": "perl-modules-5.38" } ] }
{ "availability": "No subscription required", "ubuntu_priority": "medium", "binaries": [ { "binary_version": "5.38.2-3.2ubuntu0.1", "binary_name": "libperl-dev" }, { "binary_version": "5.38.2-3.2ubuntu0.1", "binary_name": "libperl5.38t64" }, { "binary_version": "5.38.2-3.2ubuntu0.1", "binary_name": "perl" }, { "binary_version": "5.38.2-3.2ubuntu0.1", "binary_name": "perl-base" }, { "binary_version": "5.38.2-3.2ubuntu0.1", "binary_name": "perl-debug" }, { "binary_version": "5.38.2-3.2ubuntu0.1", "binary_name": "perl-doc" }, { "binary_version": "5.38.2-3.2ubuntu0.1", "binary_name": "perl-modules-5.38" } ] }