Perl の場合は、DATA ファイルハンドラとして、__END__ 以後を読み込む機能がある。 while (<DATA>) { print; } __END__ aaaa bbbb cccc</data>

DATA を使うと、ファイルの __END__ 以後をデータとしてアクセスできるとのこと。DATA は、File オブジェクトらしい。erb などのテンプレートエンジンと組み合わせている例をどこかで見た。なかなか便利かも。 while line = DATA.gets print line end __END_…