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.