Select Code to Download

has +dbh => (
    is => 'lazy',
...
        } ) or die "Cannot connect: $DBI::errstr";
      }
);

has base_file => (
    is       => 'rw',
...
        return $base_fh;
      }
);