ヒアドキュメント

#!/usr/bin/perl

$a="aaaaa";
print << "__HOGEHOGE__";  # ←ここのセミコロンを忘れると
start
-----$a-----
end
__HOGEHOGE__

print "END\n";            # ←ここでエラーになる