dropExtension "/directory/path.ext" == "/directory/path" dropExtension x == fst (splitExtension x)
dropExtension "/directory/path.ext" == "/directory/path" dropExtension x == fst (splitExtension x)
dropExtensions "/directory/path.ext" == "/directory/path" dropExtensions "file.tar.gz" == "file" not $ hasExtension $ dropExtensions x not $ any isExtSeparator $ takeFileName $ dropExtensions x
dropExtensions "/directory/path.ext" == "/directory/path" dropExtensions "file.tar.gz" == "file" not $ hasExtension $ dropExtensions x not $ any isExtSeparator $ takeFileName $ dropExtensions x