use Fcntl;
use SDBM_File;

tie my %hash, "SDBM_File", "file.sdbm", O_RDWR | O_CREAT, 0666;

-->

use Tie::Hash::DBD;

tie my %hash, "Tie::Hash::DBD", "dbi:SQLite:dbname=file.sqlite";