RosettaCodeData/Task/Hostname/Oberon/hostname.oberon

MODULE HostName;
IMPORT
  OS:ProcessParameters,
  Out;
BEGIN
  Out.Object("Host: " + ProcessParameters.GetEnv("HOSTNAME"));Out.Ln
END HostName.