unix-recursive-0.1.0.0: bin/unix-recursive-string.hs

module Main where

import System.Environment (getArgs)
import qualified System.Posix.Recursive as Lib


main :: IO ()
main = do
    [path] <- getArgs
    all <- Lib.followList path
    print $ length all