RosettaCodeData/Task/Hostname/Haskell/hostname-1.hs

4 lines
81 B
Haskell

import Network.BSD
main = do hostName <- getHostName
putStrLn hostName