Perl - enlever les séparateurs

Salut,

que veut tu dire? tu veux enlever

guillemets suis d'une virgule suis guillement

et

guillemets suis d'un espace suis de guillemets
?!

Je ne comprend pas vraiment ce que tu veux?

Tu veux afficher une partie de ton texte pour mieux comprendre? Merci

lami20j

#! /usr/bin/perl

use warnings;
use strict;

while ( <DATA> ) {
  s/(?:"(?:,|\s)")//g;
  print;
}

__END__
"Voila une ligne "," separator "," fin de ligne"
"2ème ligne "," n'importe quoi "," fin de ligne"

C'est quelque chose comme ça?