my (%settings,$name,$value); while ((undef,$name, $value) = sql->fetchrow_array()) { $settings{$name}=$value; } $sql->finish(); print "$name\n";