import Data.List
import Data.Bits
import Text.Printf
import Text.Regex
import Data.Function
import Data.List.Split
import Control.Monad

main = do
  s <- splitRegex (mkRegex ",") <$> getLine
  printf "%s %s %s" (s!!0) (s!!1) (s!!2)