-- | Remove trailing space (including newlines) from string.
trimr :: String -> String
trimr = reverse . triml . reverse
trimr :: String -> String
trimr = reverse . triml . reverse
trimr = reverse . triml . reverse