my @system = ();
while(my ($id, $name) = $fetch->fetchrow_array())
{
  my $hasref={id=>$id,name=>$name};
  push(@system,$hashref);
}