Perl | 脚本学习

perl

perl 获取shell命令的执行结果

perl里可以调用shell命令,有时需要根据shell命令的返回结果做进一步的工作,如何获得shell的执行结果?

1. 重定向shell的标准输出或标准错误输出到某临时文件,然后再从临时文件中读出执行结果。
这个办法的好处是可以把标准输出和标准错误输出分开保存!
2. 这种方法很直接,也很想shell

my $res = `ls`;

3. 把管道用起来,比较新颖

open( my $fh, "ls |") or die "$!";
while ( <$fh> ) {
    print;
}

perl 简单介绍

    Perl是一个高阶程式语言,由 Larry Wall和其他许多人所写,融合了许多语言的特性。它主要是由无所不在的 C语言,其次由 sed、awk,UNIX shell 和至少十数种其他的工具和语言所演化而来。
    Perl对 process、档案,和文字有很强的处理、变换能力,因此举凡有关快速原型设计、系统工具、软体工具、系统管理、资料库连结、图像程式设计、网路连结,和 WWW程式设计等之类的任务,都特别 适合用 Perl来做。这些特长不但使 Perl成为系统维护管理者和 CGI作者的宠儿,就连数学家、遗传学家、新闻从业者,甚至企业管理者也都用 Perl,所以或许您也该用。
perl官方网站

perl 列表和数组变量详解

一、列表
列表是包含在括号里的一序列的值,可以为任何数值,也可为空,如:(1, 5.3 , “hello” , 2),空列表:()。
注:只含有一个数值的列表(如:(43.2) )与该数值本身(即:43.2 )是不同的,但它们可以互相转化或赋值。
列表例:
(17, $var, “a string”)
(17, 26 < < 2)
(17, $var1 + $var2)
($value, "The answer is $value")
More >

perl 中文处理技巧 (编码问题)

Perl从5.6开始已经开始在内部使用utf8编码来表示字符,也就是说对中文以及其他语言字符的处理应该是完全没有问题的。我们只需要利用好Encode这个模块便能充分发挥Perl的utf8字符的优势了。

下面就以中文文本的处理为例进行说明,比如有一个字符串”测试文本”,我们想要把这个中文字符串拆成单个字符,可以这样写:
More >

perl 文件处理

一、打开、关闭文件
    语法为open (filevar, filename),其中filevar为文件句柄,或者说是程序中用来代表某文件的代号,filename为文件名,其路径可为相对路径,亦可为绝对路径。

    open(FILE1,"file1");
    open(FILE1, "/u/jqpublic/file1");

More >

google reader 哪吒
QQ邮箱 my yahoo
抓虾 鲜果