Perl

Perlヒアドキュメント

More than 1 year has passed since last update.

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