http://www.perlmonks.org?node_id=964907


in reply to Neat format and word wrap

See perlform for another way to do it.

--MidLifeXis