print "DEBUGGING: \n", join ",", keys %$weather;