Imports System.Collections.Generic
Imports System.Console
Module Program
    Sub Main()
        Dim tmp As String() = Console.ReadLine().Split(New Char() {","c})
        Dim a As String = tmp(0)
        Dim b As String = tmp(1)
        Dim c As String = tmp(2)
        Dim s As String = a +" "+ b +" "+ c
        Console.WriteLine(s)
    End Sub
End Module
