Help for this page
my (@cols, @hw) = new Itiv::Hw->all_hw($dbh, $filter);
package Itiv::Hw; use Exporter; ... return (\@cols, \@hw); } 1;