1*256a93a4Safresh1use strict; use warnings; 2b39c5158Smillert 3*256a93a4Safresh1BEGIN { require './t/lib/ok.pl' } 4b39c5158Smillertuse Text::Wrap; 5b39c5158Smillert 6b39c5158Smillertprint "1..1\n"; 7b39c5158Smillert 8b39c5158Smillert$Text::Wrap::columns = 1; 9b39c5158Smillerteval { wrap('', '', ''); }; 10b39c5158Smillert 11*256a93a4Safresh1ok( !$@ ); 12b39c5158Smillert 13