c:\@Work\Perl>perl -wMstrict -le
"$_ = 'asd\" efg\"';
 print qq{:$_:};
 ;;
 $_ =~ s/\"//g;
 print qq{:$_:};
"
:asd" efg":
:asd efg: