This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl #126325] don't read past the end of the source for pack [Hh]
authorTony Cook <tony@develop-help.com>
Thu, 22 Oct 2015 01:03:05 +0000 (12:03 +1100)
committerTony Cook <tony@develop-help.com>
Wed, 11 Nov 2015 02:30:39 +0000 (13:30 +1100)
commit0403a1ad8ff01aaac2d09a986ea6bb5210472459
tree349419ce72afc0861518db58c3bfc280e940ed6b
parentfdfd5e4d926a555f6d4f156d79198d8c6db9dc44
[perl #126325] don't read past the end of the source for pack [Hh]

With a utf8 target but a non-utf8 source, pack Hh would read past the
end of the source when given a length, due to an incorrect condition.
pp_pack.c
t/op/pack.t