les "" en text

bonjour,

J'ai un petit soucis, enfaite je veut écrire sur un fichier un text comporte des "" donc comment on peut mettre des "" dans un text entre ""? je ne sais pas si vous avais compris.
par exemple:

Code:

---

my $text = "je veut écrire un "e" phrase "

---

donc comment je peut avoir en sorti "e"
merci

Code:

---

my $text = "je veut écrire un \"e\" phrase ";

---

en protégant avec un \ ou

Code:

---

my $text = 'je veut écrire un "e" phrase ';

---

Mais dans ce cas, il n'y aura pas d'interpolation de variable s'il y en a dans ta chaine.

Merci

Une autre manière de procéder est d'utiliser les opérateur q ou qq (simple quote ou double quote avec interpolation) :

Code:

---

1 2	my $text = qq(je veux écrire un "e" dans une phrase); my $text = q(je veux écrire un "e" dans une phrase terminée par un $end); # $end non interpolé

---

Autre solution :

Code:

---

1 2 3 4 5 6 7 8

my $text = <<"TEXT"; je veux écrire un "e" dans une phrase TEXT   my $text = <<'TEXT'; je veux écrire un "e" dans une phrase terminée par un $end TEXT # $end non interpolé

---

Avec cette écriture, l'etiquette TEXT pourrait s'appeler autrement. Par contre, le dernier doit être en fin de ligne tout seul sans espace avant et après.

TIMDOWTDI:

Code:

---

1 2 3 4

my $quote = '"'; my $text = "je veux écrire un ${quote}e${quote} dans une phrase"; my $text = join "", "je veux écrire un ", ${quote}, "e", ${quote}, " dans une phrase"; # ...

---

:mrgreen:

D'ailleurs,
Les bonnes pratiques (Perl::Critic) recommande d'utiliser une variable pour les quote dans les chaines.

Exemple :

Code:

---

1 2	my $SIMPLEQUOTE = q{"}; my $text = 'je veux écrire un ' . $SIMPLEQUOTE . 'e' . $SIMPLEQUOTE .' dans une phrase';

---

:aie: