dbmopen (%db,"file.db",0666); foreach $key (keys %db) { delete $db{$key}; } dbmclose (%db);@H_502_3@ 这通常是可以的,但有时数据库在调用此清理代码之前会变得非常大,而且通常是在用户想要执行重要操作时. 有更好的方法吗？
这通常是可以的,但有时数据库在调用此清理代码之前会变得非常大,而且通常是在用户想要执行重要操作时.
有更好的方法吗？
unlink $file;@H_502_3@ 由于您的第三个参数dbmopen是文件模式而不是undef,dbmopen将在下次调用时重新创建该文件： dbmopen my %db,$file,0666;@H_502_3@
由于您的第三个参数dbmopen是文件模式而不是undef,dbmopen将在下次调用时重新创建该文件：
dbmopen my %db,$file,0666;@H_502_3@
