论坛 › Perl › 神奇的perl dbm

sm702 发表于 2017-5-17 11:24:06

神奇的perl dbm

　　perl的dbm是一种以文件形式存储的hash 
　　例子：
　　1、写入
　　$str ='abe'x50;
　　dbmopen(%file,"E:/temp/h",0666); 
　　foreach $i (1..524560){
　　$file{$i}= $str;
　　print $i/524560,"\n";
　　}
　　dbmclose(%file);
　　2、读取
　　dbmopen(%file,"E:/temp/h",0666); 
　　print $file{3};
　　dbmclose(%file);    
　　注：对%file的操作需在dbopen与dbclose代码段之间，否则出错

查看完整版本: 神奇的perl dbm