6 lines
146 B
Haskell
6 lines
146 B
Haskell
|
import System.IO
|
||
|
|
|
||
|
|
printFileSize filename = withFile filename ReadMode hFileSize >>= print
|
||
|
|
|
||
|
|
main = mapM_ printFileSize ["input.txt", "/input.txt"]
|