__DATA__ が上書きされてしまう

質問

__DATA__ は、__END__ と違う。
巧いこと名前空間分けてくれる。
だから、複数ファイル require しても期待通りに働く。

というような解説を読みました。

下記は sub１の__DATA__ が欲しいのですが、sub２__DATA__が扱われます。

------------------- main.pl
require 'sub1.pl';
require 'sub2.pl';
&sub1();
-------------------

--------------------------- sub1.pl
sub sub1(){ print <DATA>; }
1;
__DATA__
ここは１です。
-----------------------------------

----------------------------- sub2.pl
sub sub2(){ print <DATA>; }
1;
__DATA__
This is ２
------------------------------------

sub１内なのに、sub２の__DATA__が入っては困ります。
どう解決すれば良いのでしょうか?

回答No.1

noname#43437 · ベストアンサー

うーん、、その解説が、間違いです。
正しくは
「カレントパッケージの名前空間にオープンする」
です。
sub1.plとsub2.plの先頭に、それぞれ
package SUB1; と、 package SUB2;を入れて、
&SUB1::sub1();
と、呼んでみましょう。これならうまくいくはずです。

お礼

なるほど。大変良くわかりました。
ありがとうございました!