Comment puis-je séparer les variables Perl du texte dans les chaînes interpolées?

Question

imprimer "$ foo", "AAAAAAAA", $ foo, "BBBBBBBB";

Disons que je veux utiliser ce code avec un print <<EOF;:

print <<EOF; 
    $fooAAAAAAAA$fooBBBBBBBB"; 
EOF 

Cela ne marchera pas parce que Perl pense que j'ai une variable appelée fooAAAAAAAA $. Comment puis-je utiliser facilement print << avec de telles lignes quand j'ai un long test à imprimer?

Answer 1

Utilisation ${foo}:

print <<EOF; 
    ${foo}AAAAAAAA${foo}BBBBBBBB"; 
EOF 

Answer 2

Voici une autre façon de le faire en utilisant printf:

printf << EOF, $foo, $foo; 
    %dAAAAA%dBBBBBBB 
EOF 

qui est, en supposant que vous souhaitez imprimer $foo comme un nombre décimal. Vous pouvez remplacer %d par le format dont vous avez besoin.

Answer 3

Et une autre réponse, basée sur des chaînes non interpolées, qui je pense est le plus approprié.

print <<'EOF'; 
    $fooAAAAAAAA$fooBBBBBBBB"; 
EOF 

http://perldoc.perl.org/perlop.html#Quote-Like-Operators