Discussion :

[autousto]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

donc comment je peut avoir en sorti "e"
merci

[djibril]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

en protégant avec un \ ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

[autousto]

Merci

[Philou67430]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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é

[djibril]

Autre solution :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

[Philou67430]

TIMDOWTDI:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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";
# ...

[djibril]

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

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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