Problem:
Score : 100 points

Problem Statement

As a New Year's gift, Dolphin received a string s of length 19.

The string s has the following format: [five lowercase English letters],[seven lowercase English letters],[five lowercase English letters].

Dolphin wants to convert the comma-separated string s into a space-separated string.

Write a program to perform the conversion for him.

Constraints

The length of s is 19.

The sixth and fourteenth characters in s are ,.

The other characters in s are lowercase English letters.

Input

The input is given from Standard Input in the following format:

s

Output

Print the string after the conversion.

Sample Input 1

happy,newyear,enjoy

Sample Output 1

happy newyear enjoy

Replace all the commas in happy,newyear,enjoy with spaces to obtain happy newyear enjoy.

Sample Input 2

haiku,atcoder,tasks

Sample Output 2

haiku atcoder tasks

Sample Input 3

abcde,fghihgf,edcba

Sample Output 3

abcde fghihgf edcba

Solution in Fortran (gfortran v4.8.4) (judge verdict: Runtime Error)

program main
    implicit none
    integer, parameter:: inf = 10000
    integer, allocatable:: dist(:,:), a(:), b(:), c(:) 
    integer:: n, m, i, j, k
    integer:: ans

    read*, n, m
    allocate(dist(m,m), a(m),b(m),c(m))

    do i = 1, m
        read*, a(i), b(i), c(i)
    end do

    dist(:,:) = inf
    
    do i = 1, m
        dist(i,i) = 0
    end do

    do i = 1, m
        dist(a(i),b(i)) = min(dist(a(i),b(i)),c(i))
        dist(b(i),a(i)) = min(dist(b(i),a(i)),c(i))

    end do


    do k = 1, m
        do i =1, m
            do j = 1, m
                dist(i, j) = min(dist(i,j), dist(i,k) + dist(k,j))
            end do
        end do
    end do

    ans = m

    do i = 1, m
        do j = 1, m
            if (dist(i,b(j)) == dist(i,a(j)) + c(j)) then
                ans = ans - 1
                exit
            end if
        end do
    end do

    print'(i0)', ans

end program