while(my($key, $value) = each %myhash){ print $key . ":" . $value . "\n"; }