34、Perl文件操作与脚本参数处理全解析

Perl文件操作与脚本参数处理全解析

1. 文件句柄关闭

在Perl编程中，在重新打开文件句柄之前，系统会自动关闭它。不过，在使用完文件句柄后手动关闭它们是良好的编程习惯，这样可以避免在脚本中占用不必要的空间。关闭文件句柄可以使用close函数，示例如下：

close FILE;

2. 提取邮件主题并保存示例

Perl在处理电子邮件邮箱格式方面表现出色，因为每封邮件都遵循特定的格式（基于RFC822协议），并且都收集在纯文本文件中。下面是一个简单的脚本示例，用于从邮箱文件中提取所有邮件的主题行，并将其保存到一个名为subjects.txt的文件中。

#!/usr/local/bin/perl -w use strict; open(OUTFILE, ">subjects.txt") or die "Can't open subjects file: $!\n"; while (<>) { if (/^Subject:/) { print OUTFILE $_; } } close OUTFILE;

这个脚本有两个关键点需要注意：
- 第4行使用>字符以写入模式打开subjects.txt文件。
- 第8行将匹配到的主题行打印到OUTFILE