diff --git a/src/Streamly/Coreutils/ShellWords.hs b/src/Streamly/Coreutils/ShellWords.hs
deleted file mode 100644
index 48f048b..0000000
--- a/src/Streamly/Coreutils/ShellWords.hs
+++ /dev/null
@@ -1,134 +0,0 @@
--- |
--- Module      : Streamly.Coreutils.ShellWords
--- Copyright   : (c) 2022 Composewell Technologies
--- License     : Apache-2.0
--- Maintainer  : streamly@composewell.com
--- Stability   : experimental
--- Portability : GHC
---
--- Parse a string into words using shell escaping rules.
-
-module Streamly.Coreutils.ShellWords
-    (
-      escapedChar
-    , escapedWord
-    , quotedString
-    , flag
-    , shellWord
-    , shellWords
-    )
-where
-
-import Control.Applicative ((<|>), optional)
-import Control.Monad.Catch (MonadCatch)
-import Data.Char (isSpace)
-import Data.Foldable (asum)
-import Data.Maybe (fromMaybe)
-import Streamly.Internal.Data.Parser (Parser)
-
-import qualified Streamly.Internal.Data.Fold as Fold
-import qualified Streamly.Internal.Data.Parser as Parser
-import qualified Streamly.Internal.Unicode.Parser as Parser
-
--------------------------------------------------------------------------------
--- Parsing utils
--------------------------------------------------------------------------------
-
--- | Match the input with the supplied string and return it if successful.
-string :: (MonadCatch m, Eq a) => [a] -> Parser a m [a]
-string s = s <$ Parser.listEqBy (==) s
-
--- | Parse a single item of a series of items separated by the supplied
--- separator.
-{-# INLINE sepBy1 #-}
-sepBy1 :: MonadCatch m => Parser a m b -> Parser a m c -> Parser a m [b]
-sepBy1 p sep = do
-    x <- p
-    xs <- Parser.many (sep >> p) Fold.toList
-    return (x:xs)
-
--- | sepBy1 or empty, does not fail.
-{-# INLINE sepBy #-}
-sepBy :: MonadCatch m => Parser a m b -> Parser a m c -> Parser a m [b]
-sepBy p sep = sepBy1 p sep <|> return []
-
--- | Parse exactly one item irrespective of what it is.
-one :: MonadCatch m => Parser a m a
-one = Parser.satisfy $ const True
-
--- | Skip one or more white space characters.
-space1 :: MonadCatch m => Parser Char m ()
-space1 = Parser.takeWhile1 isSpace Fold.drain
-
--------------------------------------------------------------------------------
--- Escaped words
--------------------------------------------------------------------------------
-
--- | Parse a char escaped by a backslash
-escapedChar :: MonadCatch m => Char -> Parser Char m Char
-escapedChar c = c <$ Parser.listEqBy (==) ("\\" <> [c])
-
--- | Take a non-space character, honor escaping of space.
-notSpace :: MonadCatch m => Parser Char m Char
-notSpace =
-        escapedChar ' '
-    <|> Parser.satisfy (not . isSpace)
-
--- | Take a token that is not space char and not the given char. Honors
--- escaping of space or the supplied char.
-notSpaceOr :: MonadCatch m => Char -> Parser Char m Char
-notSpaceOr ch =
-        escapedChar ' '
-    <|> escapedChar ch
-    <|> Parser.satisfy (\c -> not (isSpace c) && (c /= ch))
-
--- | Take characters until an unescaped space is encountered.
-escapedWord :: MonadCatch m => Parser Char m String
-escapedWord = Parser.many notSpace Fold.toList
-
--------------------------------------------------------------------------------
--- Quoted strings
--------------------------------------------------------------------------------
-
--- | Single or double quoted string with balanced quotes. The string may
--- contain escaped quotes.
-quotedString :: MonadCatch m => Parser Char m String
-quotedString = do
-    q <- Parser.satisfy (\c -> elem c ['\'', '\"'])
-    Parser.manyTill (escapedChar q <|> one) (Parser.char q) Fold.toList
-
--------------------------------------------------------------------------------
--- Flags
--------------------------------------------------------------------------------
-
--- | Equal sign followed by a string e.g. in an assignment like @k=value@.
-assignment :: MonadCatch m => Parser Char m String
-assignment = (:) <$> Parser.char '=' <*> (quotedString <|> escapedWord)
-
--- | A flag, for example, @-flag@, @--flag@, or @--\"quoted flag\"@ without an
--- assignment.
-flagWithoutAssign :: MonadCatch m => Parser Char m String
-flagWithoutAssign =
-    (<>)
-        <$> (string "--" <|> string "-")
-        <*> (quotedString <|> Parser.many (notSpaceOr '=') Fold.toList)
-
--- | A flag, with or without an assignment
-flag :: MonadCatch m => Parser Char m String
-flag =
-    (<>)
-        <$> flagWithoutAssign
-        <*> (fromMaybe "" <$> optional assignment)
-
--------------------------------------------------------------------------------
--- Shell escaped parsing
--------------------------------------------------------------------------------
-
--- | Parse an escaped word, a quoted string or a flag with or without
--- assignment using an equal sign.
-shellWord :: MonadCatch m => Parser Char m String
-shellWord = asum [escapedWord, quotedString, flag]
-
--- | Parse many shell words. See 'shellWord'.
-shellWords :: MonadCatch m => Parser Char m [String]
-shellWords = shellWord `sepBy` space1
diff --git a/streamly-coreutils.cabal b/streamly-coreutils.cabal
index 7bb3bae..d10f535 100644
--- a/streamly-coreutils.cabal
+++ b/streamly-coreutils.cabal
@@ -129,7 +129,6 @@ library
     , Streamly.Coreutils.ReadLink
     , Streamly.Coreutils.Rm
     , Streamly.Coreutils.Sh
-    , Streamly.Coreutils.ShellWords
     , Streamly.Coreutils.Sleep
     , Streamly.Coreutils.Stat
     , Streamly.Coreutils.String