fold: Wrap input lines to fit in specified width

$cat test.pl use strict; use File::Rename (); use Pod::Usage; main() unless caller; sub main { my $options = File::Rename::Options::GetOptions or pod2usage; mod_version() if $options->{show_version}; pod2usage( -verbose => 2 ) if $options->{show_manual}; pod2usage( -exitval => 1 ) if $options->{show_help}; @ARGV = map {glob} @ARGV if $^O =~ m{Win}msx; File::Rename::rename(\@ARGV, $options); } sub mod_version { print __FILE__ …

fold

ahiliation@debian:~$fold -w 8 file edit view terminal help file edi t view t erminal help ahiliation@debian:~$ fold – wrap each input line to fit in specified width http://linux.about.com/library/cmd/blcmdl1_fold.htm