6 lines
191 B
Haskell
6 lines
191 B
Haskell
import System.Posix.File
|
|
|
|
printFileSize filename = do stat <- getFileStatus filename
|
|
print (fileSize stat)
|
|
|
|
main = mapM_ printFileSize ["input.txt", "/input.txt"]
|