2009/03/13 (金)
■ BEGIN を使わずにコンパイル時にコードを実行する

use Module VERSION の形をつかって VERSION に式をぶちこむ。
use less sub { ("Dyna"."Loader")->can("dl_find_symbol")->(...) }->();
less.pm はとくに import で何もしていないので sub {} で何を返してもおkだけど、そうじゃないモジュールを利用する場合は return () とかする必要がある、かも。
See also: perl から任意の C ライブラリを呼び出す方法 - kazuhoのメモ置き場
コメント