ドキュメント見ればいいです。 http://perldoc.perl.org/SelfLoader.html use strict; use warnings; use SelfLoader; # 1 while(<DATA>); # 先にDATAを全て読み出してしまうとダメ print foo() . "\n"; # OK print bar() . "\n"; # SelfLoaderを使っている && ま</data>…