my $query = qq|SELECT * FROM printers WHERE id = ?|;
my ($printer) = selectfirst_hashref_query($::form, $dbh, $query, $params{id});
my $query = qq|SELECT * FROM printers WHERE id = ?|;
my ($printer) = selectfirst_hashref_query($::form, $dbh, $query, $params{id});