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