Select Code to Download

sub get_header {
   my $self = shift;
...
   my $self = shift;
   Section->new(dbh => $self->dbh, title => "Footer");
}

sub make_section {
   my $self = shift;
...
   my $self = shift;
   $self->make_section(title => "Footer");
}