#!/usr/bin/env perl
use warnings;
use strict;
while(<STDIN>) {
s/”/\"/g;
s/“/\"/g;
s/„/\"/g;
print $_;
}