Since other modules might be using Text::Wrap, it's a good idea to localise your change to $Text::Wrap::columns. This ensures that other modules aren't affected by your change to this variable.

local $Text::Wrap::columns = 60;
[download]

Kudos to bart for already mentioning this in their response.