More Code 

Text::Para->mk_accessors(qw(columns));