Well, we need more info then. What version are you using? Have you reduced the script so you check only Text::Wrap? Also, you said the script errors out and crashes. What's the exact message? As it stands, what you have posted should work.

antirice    
The first rule of Perl club is - use Perl
The ith rule of Perl club is - follow rule i - 1 for i > 1