$line=' "the text" i found in "the" "line';

$line =~ s/(\w)"/$1/g; 

print $line;