web-dev-qa-db-ja.com

補間された文字列のテキストからPerl変数を分離するにはどうすればよいですか?

考えてみましょう:

print "    $foo", "AAAAAAAA", $foo, "BBBBBBBB";

このコードをprint <<EOF;で使用したいとします。

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

Perlは私が$fooAAAAAAAAという変数を持っていると考えているので、それは機能しません。印刷するテストが長い場合、このような行でprint <<を簡単に使用するにはどうすればよいですか?

37
Julien

使用する ${foo}

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

そして、補間されていない文字列に基づく別の答えは、私が最も適切だと思います。

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

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

0
basos