JS
contents <- getArgs >>= readFile . head <&> linesно
contents <- getArgs >>= head >>> readFile <&> linesвыглядит читабельнее, т.к. функи в соответствующем порядке слева направо. Но из-за прецедентности >>> придется в скобки брать
args <- getArgs
contents <- readFile $ head args
let fileLines = lines contents