vector-bytestring-0.0.0.0: tests/lazyio.hs

import qualified Data.Vector.Storable.ByteString.Lazy as L
import System.IO
import System.Environment

main = do
    n <- getArgs >>= readIO . head
    L.hGetContentsN n stdin >>= L.hPut stdout .  L.filterNotByte 101

-- main = L.hGet stdin 10000000000 >>= print . L.length