怎么操作Perl 文本文件的读写操作、文件的重命名和删除、多个文本文件的合并实现代码
来源：爱站网时间：2021-09-18编辑：网友分享
怎么操作Perl 文本文件的读写操作、文件的重命名和删除、多个文本文件的合并实现代码，这些问题你遇到过吗，爱站技术小编最近把这些问题都遇到了一遍，想着找到了方法就应该发出来，于是现在po在了这里。有需要的朋友可以参考下
读文件：
#!perl
open filetxt,"/path/a.txt"; # filetxt为文件句柄，用于和文件a.txt建立链接。文件句柄可任意取名，但不要和Perl自带的几个文件句柄重名。
close filetxt; # 关闭文件句柄filetxt。另一种关闭的方法是将其与其它文件建立关联，如：open filetxt,"b.txt";如此则与原来文件a.txt的关联自动关闭。
或者
#!perl
open filetxt,"
{
print $line;
)
close filetxt;
写文件：
在 open 一行中将 或 >> ，即可向文件中写入内容。如：
#!perl
open TXT,">a.txt";
print TXT "梦里不知身是客，\n"; # 如果文件a.txt存在，则其内容会被取代
print TXT "一晌贪欢。\n"; # 该行内容会附加到第二行
close TXT;
[code]
或者
#!perl
open TXT,">>a.txt";
print TXT "独自莫凭栏，无限江山，别时容易见时难。\n"; # 如果文件a.txt已存在，该行内容会被附加到已存在文件的后面
close TXT;
>，将内容输出到文件中，并将原有文件中的内容清空。
>>，将内容追加到文件中，不会清空原有文件中的内容。
文件的重命名和删除：
rename:将文件重命名
#!perl
rename "a.txt","b.txt"; # 或者 rename "a.txt","a.bat";
unlink:等同于rm，删除系统中的某些文件
#!perl
my @files=; # 或者 my @files=glob "*.txt";
unlink @files;
或者
#!perl
unlink glob "*.txt";
或者
#!perl
unlink ;
多个文本文件的合并：
在Perl中，可以按照如下方式合并多个文本文件：
#!perl
open a,">a.txt";
print a "四十年来家国，三千里地山河。";
open b,">b.txt";
print b "凤阁龙楼连霄汉，玉树琼枝作烟萝。";
open c,">c.txt";
print c "几曾识干戈？"; # 分别建立文本文件 a.txt、b.txt和c.txt，并执行写入操作
close a;
close b;
close c; # 关闭对应的文件句柄（filehandle）
open a,">>a.txt";
open b, "b.txt";
open c, "c.txt"; # 重新建立文件关联，其中 a.txt 执行附加写入操作，其它两个文件执行读文件操作
print a "\n".."\n"; # 利用 . 进行字符串的连接，此操作符必须
print a
close a;
close b;
close c;
[code]
或者
[code]
#!perl
open a,">a.txt";
print a "四十年来家国，三千里地山河。\n";
open b,">b.txt";
print b "凤阁龙楼连霄汉，玉树琼枝作烟萝。\n"; # 生成文件并写入内容时，即执行换行操作，让光标留在下一行
open c,">c.txt";
print c "几曾识干戈？\n"; # 分别建立文本文件 a.txt、b.txt和c.txt，并执行写入操作
close a;
close b;
close c; # 关闭对应的文件句柄（filehandle）
open a,">>a.txt";
open b, "b.txt";
open c, "c.txt"; # 重新建立文件关联，其中 a.txt 执行附加写入操作，其它两个文件执行读文件操作
print a ; # 利用 . 进行字符串的连接，此操作符必须
print a
close a;
close b;
close c;
如果想要在合并文本文件后删除文本文件 b.txt 和 c.txt ，可以在后面加上如下代码：
unlink
unlink
或者
unlink "b.txt";
unlink "c.txt";
或者
unlink
或者
unlink "b.txt","c.txt";
以上内容就是爱站技术频道小编为大家分享的怎么操作Perl 文本文件的读写操作、文件的重命名和删除、多个文本文件的合并实现代码，看完以上分享之后，大家应该都知道遇到这些问题要怎么解决了吧。
