.
.
.
use pm::search;
my $rv = "content-type: text/html\n\n";
my $dbh = sql_connect("ns.db");
.
.
.
my $st = "eye_clr"; # field to search for
my $sv = 1; # value to search for
$rv .= "Testing <i><b>search_item</b></i><br>\n";

my @users = get_users($dbh, 1); # gets JUST a list of user ID's - which uses the above "sql_execute" subroutine and works perfectly!

$rv .= "searching " . @users . " users: ";
foreach my $uid (@users) { $rv .= "$uid, "; }
$rv =~ s/, $/<br>\n/; # replace the last comma and space with a <br> and a new line
$rv .= "";
# the following should return JUST a hash reference! but nooooo....it returns convoluted results which just baffle me

my @results = search_item($dbh, \@users, $st, $sv) . "\n";
$rv .= "Number of array elements: <b>" . @results . "</b><br>\n";

foreach my $result (@results) {
  $rv .= "$result<br>\n";
}

.
.
.

print $rv;

exit 1;