#!c:/perl/bin/perl -w $|++; use strict; my $txt = <<'TXT_DONE'; This is an "example", where all of the "quotes in this text" are removed, therefore cleansing the text of "all visible quotes". "So this quote", as well as "this quote here" will be stripped. TXT_DONE $txt =~ s/"[^"]+"//g; print $txt; __END__ This is an , where all of the are removed, therefore cleansing the text of . , as well as will be stripped.