Select Code to Download

my ($cols_ref, $hw_ref) = new Itiv::Hw->all_hw($dbh, $filter);

for my $col ( @$cols_ref ) {
  print "$col\n";
}