$dbh = DBI->connect("DBI:mysql:database=$serverDb;host=$serverName;port=$serverPort",$serverUser,$serverPass);
$sth = $dbh->prepare("SELECT code,number FROM $serverTabl_4 WHERE name = ? ORDER BY number DESC");
$sth->execute($surname);
my $ref;
while( $ref = $sth->fetchrow_hashref)
{
$codes{$ref->{code}} = $ref->{number};
print $ref->{number},"\n";
}
####
$dbh = DBI->connect("DBI:mysql:database=$serverDb;host=$serverName;port=$serverPort",$serverUser,$serverPass);
$sth = $dbh->prepare("SELECT code,sum(number) FROM $serverTabl_4 group by code");
$sth->execute();
while( $ref = $sth->fetchrow_hashref)
{
# $sum{$ref->{code}} = $ref->{number};
print $ref->{number},"\n";
}
##
##
+------+-------------+
| code | sum(number) |
+------+-------------+
| 1 | 1087 |
| 21 | 606 |
| 22 | 77 |
| 23 | 26 |
| 24 | 84 |
| 25 | 43 |
| 26 | 14 |