Skip to content

Use of uninitialized value $text in concatenation (.) or string at /usr/share/perl5/Text/WrapI18N.pm line 101, <GEN1> line 5. substr outside of string at /usr/share/perl5/Text/WrapI18N.pm line 130, <G

After stumbling more then three times over this Problem. It is time to support the solution made in the crunchbanklinux.org forum.

Use of uninitialized value $text in concatenation (.) or string at /usr/share/perl5/Text/WrapI18N.pm line 101, line 5. substr outside of string at /usr/share/perl5/Text/WrapI18N.pm line 130, line 5.
On line 130 of /usr/share/perl5/Text/WrapI18N.pm you can find:
$r = substr($string, $l);
By replacing this line with the following code, the dist-upgrade works.
if (length($text) < $l) { $r = ''; } else { $r = substr($string, $l); }

Thats it, thanks Tuqatuae for this solution. Not to mention that i know why perl is not on my favorit side ;-).