Permalink
Switch branches/tags
Find file
Fetching contributors…
Cannot retrieve contributors at this time
executable file 10 lines (6 sloc) 246 Bytes
#!/usr/bin/env runhaskell
import System.Info.MAC
main = do
macs <- macs
case macs of _:_ -> mapM_ print macs
[ ] -> putStrLn "Failed to obtain MAC address."