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

104359176

回复 19# sunzhiguolu


    我没有用过，只是最近才发现这个东西，想来想去，实在是没有用。

sunzhiguolu

回复 21# 104359176
我使用 Perl 时间较短, 只是有不明白的地方向您请教.

   

104359176

学习 Perl 语言，很容易把注意力放在一些很少用到的特性上，因为 Perl 的各种古怪特性实在是太多了。Perl 语言有许多的糟粕，是没有必要深入了解的。例如 delete array 的行为。

Perl 语言的变量有标量和数组，还有哈希。所有的数值都能用标量形式表示，其实只要学会用标量表示数据就够了。

1. my $str = 'aaa';
   
2. my $array = [1,2,3];
   
3. my $hash = { a => 1 };
   

复制代码

而下列用法完全可以不用：

1. my @array = (1,2,3);
   
2. my %hash = ( a => 1 );

复制代码

而 @array 的表示方法，只是把它当成一个可以容纳多个标量的容器：

1. my ($name, $value) = @args;

复制代码

Perl5 不能对比数据结构，所以当你对比一个嵌套的数据结构时，最好使用 JSON 模块：

1. use JSON qw(encode_json);
   
2. 
   
3. my $data_one = [1,2,[3,4]];
   
4. my $data_two = [1,2,[3,4]];
   
5. 
   
6. if (encode_json($data_one) eq encode_json($data_two)) {
   
7.     say "data is same";
   
8. }

复制代码

如果这样写，就错了：

1. if ($data_one eq $data_two) {
   
2.     say "data is same";
   
3. }

复制代码

要想使操作引用的行为和直接量相同，最好声明：

1. use experimental qw(autoderef);

复制代码

这样下面的语句就能使用了：

1. for my $key (keys $hash) {
   
2.     say "key is $key";
   
3. }
   
4. 
   
5. for my $value (values $array) {
   
6.    # ...
   
7. }
   
8. 
   
9. push $array, $key;
   
10. shift $array;
    
11. pop $array;
    
12. delete $hash->{$key};
    
13. exists $hash->{$key};

复制代码

引用最方便的地方就是没有数据复制成本，但如果不想修改原数据，需要对数据结构进行复制：

1. my $copy_array = [ @{ $array } ];

复制代码

因为 splice, push, shift, unshift, pop, delete 等内置函数会直接在数据本身进行修改。

substr 与其说是内置函数，不如说是 Perl 的关键字, 因为下面的代码是错误的：

1. my ($str, $pos, $len) = @args;
   
2. my $sub_str = substr(@args); # error
   
3. my $sub_str = substr($str, $pos, $len); # ok

复制代码

Perl 还有很多特性容易让人迷惑，如果想了解。就看看 Ruby, Python，看同样的算法，是怎么样实现的。

sunzhiguolu

回复 23# 104359176
非常感谢您的指点, 学了好多.
关于 Perl 的引用的概念还没有学到, 感觉挺您讲的非常好. (也非常喜欢您举得例子)
另外向您请教一个我在上面提到的一个问题, 就是 Tie::File 模块的 memory 选项的问题, 延迟写入为什么在程序的执行时没有 效果?
如果您方便的话, 能否给我讲讲. 我在模块的学习方面全是看论坛中的 大神, 前辈 使用的时候照葫芦画瓢的用法, 所以问题多多.



   

sunzhiguolu

回复 16# MMMIX
如果大神方便的话, 能否指点一下关于 Tie::File 模块的 memory 选项 延迟写入的问题?
期待您的回复, 谢谢您!

   

MMMIX

sunzhiguolu 发表于 2015-12-04 19:30
回复 16# MMMIX
如果大神方便的话, 能否指点一下关于 Tie::File 模块的 memory 选项 延迟写入的问题?
期 ...

期待你把 Tie::File 的文档仔细、完整的看一遍再来问问题，谢谢！

substr函数

回复 23# 104359176

一个题外话, 就是
感觉大神讲的非常好

sunzhiguolu

回复 26# MMMIX
大神您好, 还是您教导的是.
文档我没有看完整, 还有一个问题向您请教:
没有指定 memory 选项时, 延迟写入的数据缓存量是否可以认为是整个 memory 的默认大小 (2MB) 减去 延迟写入自身的开销?

   

sunzhiguolu

回复 27# substr函数
严重同意您的观点...

   

sunzhiguolu

回复 27# substr函数
对了, 向您请教个问题 Python 对正则的支持如何? 中文学习资料多吗?