Bug#880085: perl: deep recursion in Encode::find_encoding when decoding MIME header

[Jakub Wilk]

Package: perl
Version: 5.26.1-2

$ piconv -f MIME-Header -t UTF-8 < bad-mime > /dev/null
Deep recursion on subroutine "Encode::find_encoding" at /usr/lib/i386-linux-gnu/perl/5.26/Encode/Alias.pm line 46, <STDIN> line 1.
Deep recursion on subroutine "Encode::getEncoding" at /usr/lib/i386-linux-gnu/perl/5.26/Encode.pm line 132, <STDIN> line 1.
Deep recursion on subroutine "Encode::Alias::find_alias" at /usr/lib/i386-linux-gnu/perl/5.26/Encode.pm line 114, <STDIN> line 1.
Deep recursion on subroutine "Encode::Alias::find_alias" at /usr/lib/i386-linux-gnu/perl/5.26/Encode.pm line 116, <STDIN> line 1.
Deep recursion on subroutine "Encode::find_encoding" at /usr/lib/i386-linux-gnu/perl/5.26/Encode/Alias.pm line 46, <STDIN> line 1.
Deep recursion on subroutine "Encode::getEncoding" at /usr/lib/i386-linux-gnu/perl/5.26/Encode.pm line 132, <STDIN> line 1.
Deep recursion on subroutine "Encode::Alias::find_alias" at /usr/lib/i386-linux-gnu/perl/5.26/Encode.pm line 114, <STDIN> line 1.
Deep recursion on subroutine "Encode::find_encoding" at /usr/lib/i386-linux-gnu/perl/5.26/Encode/Alias.pm line 46, <STDIN> line 1.
Deep recursion on subroutine "Encode::getEncoding" at /usr/lib/i386-linux-gnu/perl/5.26/Encode.pm line 132, <STDIN> line 1.
Deep recursion on subroutine "Encode::Alias::find_alias" at /usr/lib/i386-linux-gnu/perl/5.26/Encode.pm line 114, <STDIN> line 1.
Use of uninitialized value $chk in bitwise and (&) at /usr/lib/i386-linux-gnu/perl/5.26/Encode/MIME/Header.pm line 126, <STDIN> line 1.
Use of uninitialized value $chk in bitwise and (&) at /usr/lib/i386-linux-gnu/perl/5.26/Encode/MIME/Header.pm line 127, <STDIN> line 1.
Use of uninitialized value $chk in bitwise and (&) at /usr/lib/i386-linux-gnu/perl/5.26/Encode/MIME/Header.pm line 128, <STDIN> line 1.


-- System Information:
Architecture: i386

Versions of packages perl depends on:
ii  dpkg               1.19.0.4
ii  perl-base          5.26.1-2
ii  perl-modules-5.26  5.26.1-2
ii  libperl5.26        5.26.1-2

-- 
Jakub Wilk
-------------- next part --------------
=?U________________________________________________________________________________________________________________________________________________________________________________________________________?Q??=