Read from file given in first argument

This commit is contained in:
thepenguin 2022-10-26 12:03:45 +02:00
parent c2e90bc0e6
commit 152d73665f
No known key found for this signature in database
GPG Key ID: F258C8C10D060D5E

View File

@ -1,4 +1,6 @@
module Main where module Main where
import System.Environment
main :: IO () main :: IO ()
main = putStrLn "Hello, Haskell!" main = putStrLn =<< readFile =<< head <$> getArgs