Select Code to Download

$person->make_head('large')
       ->make_nose('small')
       ->make_belly('surgerized');

package Table;
  use Column;
...
  sub make_column {
    $_[0]->[$_[1]] = Column->new;
  }