已经解决.结贴 脚本 Perl - 关于模块 Tie::File 的几点疑问

sunzhiguolu

我的代码如下:

1. 
   
2. #!/usr/bin/perl
   
3. use strict;
   
4. use warnings;
   
5. use Tie::File;
   
6. 
   
7. my ($sFile, @aData) = ('d:\data1');
   
8. tie (@aData, 'Tie::File', $sFile) or die "File $sFile can't open!\n";
   
9. printf "scalar (\@aData) = <%d>.\n", scalar (@aData);
   

复制代码

输出结果如下:

1. 
   
2. scalar (@aData) = <0>.
   

复制代码

问题:
1.> 我的文件名实际为 data, 而不是 data1. (居然没有引发 die 函数)
2.> 啥时候该使用这个模块啊
3.> 如何查询这个模块是否是 Perl 的核心模块
4.> memory 选项, 对关联文件的影响体现在哪里

sunzhiguolu

另外我想问一个题外话, 就是关于数组的 delete 函数.
此函数有用处吗? splice 函数感觉才是 delete 的意思.
什么时候该使用 delete 函数?

sunzhiguolu

1.> 未能引发 die 函数的原因找到了, 由于 mode 选项的默认值导致的问题. (缺省情况下, 以读写的方式打开文件. 若文件不存在则进行创建)
修改后, 部分代码如下:

1. 
   
2. use Tie::File;
   
3. 
   
4. ...
   
5. tie (@aData, 'Tie::File', $sFile, mode => 'O_RDWR') or die "File $sFile can't open!\n$!";
   

复制代码

如果指定的文件不存在, 现在应该可以引发 die 函数了.

sunzhiguolu

自己顶下...
那位大神知道为何访问 search.cpan.org 响应非常慢, 有什么解决办法吗?

sunzhiguolu

自己顶下...
2.> 啥时候该使用这个模块啊
从网上查了下关于 Tie::File 模块的应用场景, 是针对大文件进行操作的. 并且对数组的操作将直接影响到其关联的文件.
在这里我的疑问是, 在什么情况下才会使用这个 Tie::File 模块, 并且对其关联的文件有要求吗?

4.> 从一些资料上看, 说是允许通过 memory 选项来指定管理缓存中保存的数据记录以及 延迟写入 的大小.
      我的疑问是, 通过修改数组变量 $aData[0] = "Updated" 中第一个元素的内容, 发现改变是实时进行的并没有延迟的含义. 我的理解哪里有偏差? 还请大家指点...

MMMIX

sunzhiguolu 发表于 2015-12-03 09:37
自己顶下...
那位大神知道为何访问 search.cpan.org 响应非常慢, 有什么解决办法吗?

GFW

MMMIX

sunzhiguolu 发表于 2015-12-03 08:23
3.> 如何查询这个模块是否是 Perl 的核心模块

看 perlmodlib，不过不同版本的 Perl 自带的模块也不一样。

sunzhiguolu

回复 7# MMMIX

MMMIX 发表于 2015-12-03 13:19
GFW
看 perlmodlib，不过不同版本的 Perl 自带的模块也不一样。

请问大神 GFW 完整的含义是网址还是什么呀?
您的这个 perlmodlib 是什么意思呀?


   

sunzhiguolu

回复 7# MMMIX
另外, 大神您能说下 Tie::File 模块的具体应用场景吗? 以及 memory 选项具体的含义吗?

   

sunzhiguolu

回复 7# MMMIX
GFW => 对技术类的站点也进行干扰吗?
perlmodlib => perldoc.perl.org

谢谢指点.