Perlヒアドキュメント

Perlのヒアドキュメントメモ

SQL生成でよく使うなれないperlでよくはまるのでメモ

my $id=1;

my $sql = << "SQL";
select *
from table_a
where id=$id
;
SQL

print $sql;

• SQLの文字列は自由に決められる(EOFなどでもOK)
• SQLをダブルコーテーションで括ると変数が展開できる
• "SQL"の後ろにセミコロンが必要

この記事が詳しい
http://perl-users.jp/articles/advent-calendar/2008/14.html