substr outside of string at /usr/share/perl5/Text/WrapI18N.pm line 130.
Use of uninitialized value $text in length at /usr/share/perl5/Text/WrapI18N.pm line 52.