14.2 DBMファイルを空にする

• tieを使用してデータベースを開き、そのデータベースに関連づけられたハッシュに()を設定する。

use DB_File;

tie(%HASH, "DB_File", $FILENAME) or die;
%HASH = ();
untie %HASH;

• ファイルを削除してから、改めて開き直す。

unlink $FILENAME or die;
tie(%HASH => "DB_File", $FILENAME) or die;