in reply to question on Text::Autoformat

I'm no expert on Text::Autoformat, but as i read it correctly, your margins aren't correct.
try: autoformat($rawtext, {left=>0, right=>130}); And see if it suits your needs

Or if it's only this line, you might ignore it:
# Reformat all paras except those containing "File not found"... print autoformat { all => 1, ignore => qr/File not found/i }, $rawtext +;

"We all agree on the necessity of compromise. We just can't agree on when it's necessary to compromise." - Larry Wall.