Perl中的文件读写学习笔记
Perl文件操作包括打开、关闭文件，支持读、写、添加三种模式；使用读取内容，print写入文件；通过文件测试操作符检查文件状态；命令行参数存储在@ARGV中；子程序参数通过@_传递；支持管道操作实现系统命令交互。
一、打开、关闭文件
文件操作是Perl编程中最基础也最常用的技能之一。先说说怎么打开一个文件——语法非常直接：open(filevar, filename)。filevar是文件句柄，你可以把它理解成程序里用来代表某个文件的代号；filename是文件名，路径可以是相对路径，也可以是绝对路径。
打开文件的时候，需要决定访问模式。Perl里有三种基本的访问模式：读、写和添加。写模式和添加模式的区别在于：写模式会把原文件直接覆盖，原有内容全部丢失；添加模式则是在原文件末尾继续追加内容。比如：
- 写模式：
open(outfile, ">outfile") - 添加模式：
open(appendfile, ">>appendfile")
有一点必须注意：不能同时对同一个文件进行读和写/添加操作。也就是说，一个文件句柄一次只能干一件事。
那么怎么知道打开文件是不是成功了？open函数会返回一个值——成功时返回非零值，失败时返回零。所以我们可以这样判断：
甚至可以在文件打开失败时直接结束程序：
或者用逻辑或操作符写得更简洁：
操作完之后，别忘了用 close(MYFILE); 关闭文件。养成良好的习惯，资源才不会泄露。
二、读文件
从文件中读取内容也很直观。用 $line = <> 可以从文件中读取一行数据，存储到简单变量 $line 里，同时文件指针自动向后移动一行。这里的 <> 代表标准输入文件（通常是键盘），不需要提前打开就能用。
如果想一口气把整个文件都读进来，可以用 @array = <>。这样文件的每一行（包括末尾的换行符）都会成为数组 @array 的一个元素。批量处理时非常方便。
三、写文件
写文件的操作和读文件类似，只是要指定写模式。比如：
这里 STDOUT 和 STDERR 是标准输出和标准错误文件，通常对应屏幕，不需要手动打开，直接 print 就行。
四、判断文件状态
在操作文件之前，常常需要先检查一下文件的状态——比如存不存在、是不是目录、能不能读写等。Perl 提供了一套非常方便的文件测试操作符，语法是 -op expr。举个例子：
下面这张表总结了常用的文件测试操作符，建议收藏：
| 操作符 | 描述 |
|---|---|
| -b | 是否为块设备 |
| -c | 是否为字符设备 |
| -d | 是否为目录 |
| -e | 是否存在 |
| -f | 是否为普通文件 |
| -g | 是否设置了setgid位 |
| -k | 是否设置了sticky位 |
| -l | 是否为符号链接 |
| -o | 是否拥有该文件 |
| -p | 是否为管道 |
| -r | 是否可读 |
| -s | 是否非空 |
| -t | 是否表示终端 |
| -u | 是否设置了setuid位 |
| -w | 是否可写 |
| -x | 是否可执行 |
| -z | 是否为空文件 |
| -A | 距上次访问多长时间 |
| -B | 是否为二进制文件 |
| -C | 距上次访问文件的inode多长时间 |
| -M | 距上次修改多长时间 |
| -O | 是否只为“真正的用户”所拥有 |
| -R | 是否只有“真正的用户”可读 |
| -S | 是否为socket |
| -T | 是否为文本文件 |
| -W | 是否只有"真正的用户"可写 |
| -X | 是否只有"真正的用户"可执行 |
注：这里的“真正的用户”指的是登录时指定的userid，与当前进程用户ID相对。如果你用过 suid 命令，就会明白有效用户ID是可以被改变的。
组合使用这些测试操作符能写出非常健壮的脚本。比如下面这段代码，先检查输入文件能不能打开，再检查输出文件是否已经存在，最后才打开输出文件：
它的简化写法也很漂亮，逻辑与和逻辑或一口气搞定：
五、命令行参数的解释
和C语言一样，Perl也有一个存储命令行参数的数组 @ARGV。不过跟C不同的是，$ARGV[0] 是第一个参数，而不是程序名本身。程序名保存在 $0 中。
这里要特别提一下 <> 操作符的隐含机制。当Perl解释器第一次看到 <> 时，它会做三件事：
- 打开以
$ARGV[0]为文件名的文件。 - 执行
shift(@ARGV)，把数组@ARGV的元素向前移动一个，元素数量减少一个。 - 读取第一步打开的文件中的所有行。
- 读完后，回到第一步重复，直到所有文件名处理完毕。
来看个例子：
这段代码会把 myfile1 和 myfile2 的内容依次打印出来。
函数的参数传递
自定义函数的参数传递也值得聊聊。比如：
调用 abc("a","b") 时，参数 a 和 b 被分别赋值给 $_[0] 和 $_[1]。这是最简单直接的写法。你也可以用列表赋值的方式：
$_[0] 表示函数的第一个参数，$_[1] 表示第二个，以此类推。下面这个例子展示了两种等价的写法：
执行结果都是：
第一种写法（列表赋值）更常见，第二种则更适合处理大量参数——比如如果你有1000个参数，直接用 $_[999] 取第999个就行，其他参数不用管。
其实所有传入Perl子程序的参数都以 @_ 数组的形式传递。在函数内部，@_ 就是一个普通的数组，你可以像处理普通数组一样随意处理它。知道了这个，上面各种写法也就不奇怪了：
($first,$second)=@_;是把数组@_中的前两个元素分别赋给$first和$second。$first = shift; $second = shift;则是通过shift依次取出前两个元素。
特殊变量 $&, $`, $'
Perl 中有三个用于模式匹配的特殊变量：
$&：存放匹配中的值$`：存放匹配中之前的所有字符$'：存放匹配中之后的所有字符
看个例子：
执行结果：
请注意，@_ 是子程序的一个私有变量。即使你有一个同名的全局变量 @_，在子程序调用前它会被存储起来，调用完成后又会恢复原值。这意味着你完全不用担心参数传递会影响其他子程序。嵌套调用时也一样，甚至递归调用时每一次调用都会得到全新的 @_。
不过要提醒一点：如果调用子程序时前面带 & 但后面没有括号（或者没有参数），那么 @_ 会从调用者的上下文中继承。这种做法通常不推荐，但偶尔也会用到，灵活理解即可。
六、打开管道
在Perl里，你可以像在命令行中使用管道一样，用程序的形式打开管道。比如：
这里的 | 表示将输出重定向到后面的命令。上面这个例子实际上就是通过管道发送了一封邮件。又比如 open (MYPIPE, "| cat >hello");，它会打开一个管道，所有发送到 MYPIPE 的输出都会成为命令 cat >hello 的输入。因为 cat 会显示输入内容，所以这个语句等价于直接 open(MYPIPE, ">hello");。管道操作让Perl和系统命令的交互变得非常灵活，值得多花点时间熟悉。
IntelliJ IDEA 是 JetBrains 推出的专业集成开发环境，重点服务于 Java、Kotlin 与 JVM 项目开发。软件集成代码补全、静态检查、重构、调试、测试、版本控制及构建工具，并可借助插件扩展语言和框架支持。
JetBrains PyCharm 是面向 Python 开发者的集成开发环境，提供智能补全、代码检查、重构、调试、测试、版本控制及虚拟环境管理功能。Mac 版兼容 Intel 与 Apple 芯片，核心功能可免费使用。
JetBrains WebStorm 是面向 JavaScript、TypeScript 和现代 Web 技术的专业集成开发环境，可智能理解项目结构，提供代码补全、重构、错误检查、运行调试、测试及 Git 工具。
Adobe After Effects 是面向动态图形、影视特效与视频合成的专业创作软件。它提供关键帧动画、遮罩抠像、运动跟踪、三维空间、文字动画和表达式等工具，并可与 Premiere Pro、Photoshop、Illustrator
Adobe Audition 是面向播客、影视后期、音乐制作及内容创作者的专业音频工作站，提供波形精修、多轨录制与混音、频谱编辑、降噪修复、响度匹配和效果处理工具，并可与 Adobe Premiere 协同完成视频声音制作。
Adobe Bridge 是面向摄影师、设计师及内容团队的免费数字资产管理工具，可集中预览照片、视频和 Adobe 项目文件，并利用评级、标签、关键词、元数据、筛选与收藏集完成分类检索。它还支持批量重命名、格式导出、相机导入及 Camera
Adobe Illustrator 是 Adobe 推出的专业矢量图形设计软件，适合在 Mac 上制作标志、图标、插画、包装、信息图及印刷版面。它以路径和锚点构建可无损缩放的图形，并提供钢笔、形状、文字、图像描摹、渐变、画板及生成式功能。
Adobe InDesign 是面向印刷品与数字出版物的专业版面设计软件，可在 Mac 上制作书籍、杂志、宣传册、海报、报告及交互式文档。它提供精细的文字样式、网格、母版、长文档管理和印前输出能力。
Adobe Lightroom Classic 是面向桌面摄影工作流的照片管理与后期处理软件，可将原始照片保存在本地硬盘，通过目录、关键词、评分和收藏夹高效整理图库，并提供 RAW 冲印、蒙版、镜头校正、批量同步及多格式导出等功能。
Adobe Media Encoder 是 Adobe 推出的专业音视频编码与转码工具，可通过队列、预设和监视文件夹批量完成格式转换、代理文件创建及多平台成片输出，并与 Premiere Pro、After Effects 等软件紧密协作。
Adobe Photoshop 是面向摄影师、设计师和内容创作者的专业图像处理软件，提供图层、蒙版、选区、修复、调色、文字排版、智能对象及生成式编辑等能力。Mac 版支持 Intel 与 Apple Silicon 处理器。
Adobe Premiere Pro 是面向专业视频制作的非线性剪辑软件，提供多轨时间线、调色、音频处理、字幕、代理工作流和多格式输出能力，并可与 After Effects、Audition、Photoshop 及 Frame.io 协同
JetBrains IntelliJ IDEA 是以 Java、Kotlin 和 JVM 项目为核心的专业集成开发环境，提供智能补全、代码检查、安全重构、调试、测试、版本控制及构建工具集成。统一发行版的核心功能可免费用于商业和非商业项目，
PhpStorm 是 JetBrains 面向 PHP 与现代 Web 开发打造的专业集成开发环境，提供代码补全、静态检查、重构、调试、测试、数据库、版本控制及前端语言支持。Windows 用户可直接下载安装程序，
PyCharm 是 JetBrains 推出的 Python 集成开发环境，提供智能代码补全、错误检查、重构、调试、测试、Git、终端及 Jupyter Notebook 支持。统一版安装后可体验 30 天 Pro 功能，
WebStorm 是 JetBrains 面向 JavaScript、TypeScript 和现代 Web 技术打造的集成开发环境。它提供项目级代码分析、智能补全、安全重构、导航搜索，并集成调试、测试、终端、Git 与常用前端工具，
Adobe Photoshop 是面向摄影师、设计师和内容创作者的专业图像处理工具，可在 Windows 上完成照片修饰、选区抠图、图层合成、文字排版、绘画及生成式编辑。软件采用订阅授权，由 Creative Cloud 管理安装、更新与许
Adobe InDesign 是面向印刷与数字出版的专业页面排版工具，可制作书籍、杂志、宣传册、海报、交互式 PDF 和电子书。它提供精细的文字样式、多页面管理、印前检查及多格式输出能力，并能与 Photoshop、Illustrator
Adobe Illustrator 是用于绘制矢量图形、插画、图标、徽标和版式的专业设计工具。它以路径和锚点为核心，作品放大后仍能保持清晰，并提供画板、文字、渐变、图像描摹及精确变换等功能，适合品牌视觉、印刷物料、数字界面和商业插画创作。
Adobe Bridge 是 Adobe 推出的创意资产管理工具，可集中预览、分类和查找照片、视频、PDF及多种设计文件，并支持元数据、关键词、评级、批量重命名和格式导出。它可与 Photoshop、Illustrator 等应用衔接，
Adobe Lightroom Classic 是面向 Windows 桌面摄影工作流的照片管理与无损编辑工具，可通过目录集中整理大型图库，并完成 RAW 显影、局部蒙版、批量调整、打印和多格式导出。它强调本地文件管理与精细控制，
Adobe Acrobat Pro 是面向专业 PDF 工作的综合解决方案，可在 Windows 中创建、编辑、转换、比较、整理和保护文档，并支持表单、电子签名、扫描件文字识别及敏感信息永久遮盖。订阅还包含网页、移动服务和云端协作能力，
Adobe After Effects 是面向动态图形、动画与影视视觉特效制作的专业工具，可完成关键帧动画、图层合成、遮罩跟踪、抠像、文字动画和二维三维元素整合。Windows 版通过 Adobe Creative Cloud 安装及更新，
Adobe Media Encoder 是 Adobe 面向视频与音频制作流程提供的专业编码和转码工具，可批量处理媒体文件、创建代理、套用输出预设并监控文件夹自动执行任务。它与 Premiere、After Effects、Audition