広告
広告
この関数は変数をその変数のインプリメンテーションを行なうパッケージと結び付けます。VARIABLE は魔法をかける変数の名前で、PACKAGENAME は正しい型のオブジェクトをインプリメントするパッケージの名前です。他に引数があればそのパッケージの "new" メソッドに渡されます。通常これらはC の dbm_open()などの関数に渡す引数となります。大きな DBM ファイルではkeys() や values() のような関数は大きな配列値を返す可能性がありますので、大きなDBM ファイルではeach() 関数を使って繰り返しを行なった方がよいかもしれません。
# print out history file offsets tie(%HIST, NDBM_File, '/usr/lib/news/history', 1, 0); while (($key,$val) = each %HIST) { print $key, ' = ', unpack('L',$val), "\n"; } untie(%HIST);
広告