More Code 

sub new {
  my $class = shift;

  my $self = {
    columns => 72,
  };

  return bless $self, $class;
}