-- | Strip space characthers (including newline). As this is
-- expensive, should only be run on small strings.
rStripSpace :: String -> String
rStripSpace = reverse . dropWhile isSpace . reverse
rStripSpace :: String -> String
rStripSpace = reverse . dropWhile isSpace . reverse
rStripSpace = reverse . dropWhile isSpace . reverse