uname_r :: String
uname_r = unsafePerformIO $
    head . lines <$> readProcess "/bin/uname" ["-r"] ""
uname_r :: String
uname_r = unsafePerformIO $
    head . lines <$> readProcess "/bin/uname" ["-r"] ""
uname_r = unsafePerformIO $
    head . lines <$> readProcess "/bin/uname" ["-r"] ""