if($coord_{$key1}{$key2}[2] eq "uninitialized value")
{
  $coord_{$key1}{$key2}[2] = 0;
}