$dbq1 = $dbh->prepare(q{SELECT name FROM mytable WHERE id = ?}q);
$dbq2 = $dbh->prepare(q{SELECT age FROM mytable WHERE id = ?});
$dbq3...
####
$dbq = $dbh->prepare(q{SELECT * FROM mytable WHERE id = ?});
####
(undef, undef, name, undef) = $dbh->fetchrow_array();
####
(undef, undef, undef, age) = $dbh->fetchrow_array();