$dbm = dbmopen ("lastseen", "w"); if (dbmexists ($dbm, $userid)) {$last_seen = dbmfetch ($dbm, $userid);} else {dbminsert ($dbm, $userid, time());} do_stuff(); dbmreplace ($dbm, $userid, time()); dbmclose ($dbm);
関数 dbmopen() は、データベースIDを返します。こ のIDは、他のdbm関数で使用されます。