my @system = (); while ( ($system[scalar @system]{id},$system[scalar @system-1]{name}) = $fetch->fetchrow_array()){}