Refactor 

my @defaults = ( columns => 72 );

sub new {
  my $class = shift;
  return bless { @defaults }, $class;
}