2021.2.5
持续更新中。。。

---

《Perl语言入门》

---

1. 标准输入和输出

默认情况下，标准输入是指从键盘输入，标准输出是指输出到屏幕上。可利用while函数一行一行读取输入：

只读取一行键盘输入内容，按回车键后即终止该次输入，存储为标量；
while(my $file = <>) {
    block;
}

#读取多行键盘输入内容，存储为数组；
while(my @file = <>) {
    block;
}

注：<>相当于等于<STDIN>

---

2. 钻石操作符和文件句柄

2.1 钻石操作符<>

用于读取输入，同时输入的内容默认存储在$_中，可直接使用。

2.2 文件句柄

Perl进程和外界进行I/O通信时相联系的名字。并不是文件的名字，通过这种机制，Perl可以和任何一个外部实体交换信息，一般用大写字母来进行命名，但需要避开系统默认的特殊文件句柄名。

• 系统中默认的6个特殊文件句柄：STDIN 、STDOUT、STEERR、DATA、ARGV、ARGVOUT

2.2.1 打开文件句柄

1. 打开已存在文件dino
open CONFIG, "< dino";

2. 输出内容到新文件fred；
open BEDEROCK, "> fred";

3. 追加内容到文件logfile
open LOG, ">> logfile";

注：若文件没在当前目录下需要加上绝对路径

2.2.2 关闭文件句柄

close BEDROCK;

---

3. 特殊数组@ARGV

命令行中的参数会自动存储在特殊数组中@ARGV中，可以对其进行访问和调用。

perl my.pl 参数1 参数2 参数3...

• perl：命令
• my.pl：选项
• 参数1：即$ARGV[0]
• 参数2：即$ARGV[1]
• .....：依次类推

---

4. 读取文件实例

open IN, "< $ARGV[0]", or die "can't open the file \n$!"

• $!：Perl的特殊变量，保存着最后一刻的系统错误信息。