noCacheP :: Parser Option
noCacheP = lexeme $ string "--no-cache" $> Cache Nothing

cacheP :: Parser Option
cacheP = lexeme $ Cache . Just <$> (string "--cache" *> char '\n' *> decimal)

intervalP :: Parser Option
intervalP = lexeme $ Interval <$> (string "--interval" *> char '\n' *> decimal)

urlP :: Parser Text
urlP = lexeme url