use Fcntl; use SDBM_File; tie(%hash, SDBM_File, 'Op.dbmx', O_RDWR|O_CREAT, 0644); # read/writes of %hash are now read/writes of the file, Op.dmx.pag untie %h;
See Perl's built-in tie function. Also see the DB_File module in this chapter for a description of a closely related module.