var
s:string;
i:integer;
a,b:char;
begin
    readln(s);
    i:=1;
    a:=#39;
    b:=#34;
    while(i<=length(s)) do
    begin
        if(s[i]=#39) then
        begin
            delete(s,i,1);
            insert(b,s,i);
        end
        else inc(i);
    end;
    writeln(s);
end.