$z1++ @dbh1[$z1]->DBI:...