Perl 6: S/// 操作符 By Zoffix Znet 来自 Perl 5 背景的我， 第一次使用 Perl 6 的非破坏性替换操作符 S/// 的经历就像下面这样: img 进展会更好的。我不但会改善错误信息，…

找出两个文件中共有的行, 顺序无关紧要 在 Perl 5 里, 你可以这样: #!/usr/bin/env perl use 5.010; use warnings; use strict; my %filea = ma…

​​​有时候会需要对大文件进行并行处理，但是perl中不像其他的语言，可以使用多线程，perl的多线程其实就是对文件进行切割； 而对于文本文件,需要保证行的完整性，一种是快速跳过不需要的行： #!/usr/bin/per…

和口语类似，Perl语言由几个互相关联的小部分组成。 但是也有不同，口语能在概念模糊甚至轻微误解的情况下进行交流，但Perl做不到，计算机语言要求必须准确。得益于Perl的设计特点，你无需掌握Perl语言的所有细节就能写…

localtime perl下time函数会返回一个十位的时间戳，精确到秒，看起来像这个样子（1180630098）。这个数字是从1900年到当前时间的秒数。但你并看不出是什么意思。所以需要转换形式，转换成‘Thu Ma…

行列转置的小脚本 #!/usr/bin/perl -w use strict; my %out; open IN, $ARGV[0] || die $!; while(<IN>){ chomp; my @a …

Sneaky methods 就像你想的那样, 在类的定义中可以声明和定义方法。你期望不高的甚至文档中都很少提及是用 my 关键字声明的免费浮点方法。现在为什么你想要: my method foo(SomeClass:D…

use strict; open IN,"<1.Book"; open OUT,">final.txt"; my $i=0; my @data; while(<IN>){ chomp; my @l…

简介 可透明地从各种不同类型的文件中加载配置信息；如：JSON，XML，YAML，INI等 use Config::Any; my $cfg = Config::Any->load_stems({stems =&g…

几个问题 为什么不建议使用订单号作为主键? 为什么要在需要排序的字段上加索引? for update 的记录不存在会导致锁住全表? redolog 和 binlog 有什么区别? MySQL 如何回滚一条 sql ? c…

在关系数据库系统中，命名空间namespace指的是一个表的逻辑分组，同一组中的表有类似的用途。hbase命名空间的概念为即将到来的多组合特性打下基础： 配额管理：限制一个namespace可以使用的资源，包括regio…