print OUT join '|', split /,/ while <IN>;