4 lines
81 B
Haskell
4 lines
81 B
Haskell
|
|
import Network.BSD
|
||
|
|
main = do hostName <- getHostName
|
||
|
|
putStrLn hostName
|