my %hash
tie (%hash, 'DB_File', 'hash.dbm', O_RDONLY) || die $!;