读文件:
复制代码 代码如下:
#!perl
open filetxt,"/path/a.txt"; # filetxt为文件句柄,用于和文件a.txt建立链接。文件句柄可任意取名,但不要和Perl自带的几个文件句柄重名。
print <filetxt>; # 此处print函数用于显示文件a.txt的内容。<>为取行操作符,<文件句柄>用于读取所链接文件的内容。
close filetxt; # 关闭文件句柄filetxt。另一种关闭的方法是将其与其它文件建立关联,如:open filetxt,"b.txt";如此则与原来文件a.txt的关联自动关闭。
或者
复制代码 代码如下:
#!perl
open filetxt,"<path/a.txt"; # < 用于从文件中读取内容,但是不能写入任何内容到文件中。< 与 什么符号都不加 效果相同
while ($line=<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=<*.txt>; # 或者 my @files=glob "*.txt";
unlink @files;
或者
复制代码 代码如下:
#!perl
unlink glob "*.txt";
或者
复制代码 代码如下:
#!perl
unlink <*.txt>;
多个文本文件的合并:
在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".<b>."\n"; # 利用 . 进行字符串的连接,此操作符必须
print a <c>."\n"; # <filehandle>表示读取文件句柄所链接的文本文件的内容
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 <b>; # 利用 . 进行字符串的连接,此操作符必须
print a <c>; # <filehandle>表示读取文件句柄所链接的文本文件的内容
close a;
close b;
close c;
如果想要在合并文本文件后删除文本文件 b.txt 和 c.txt ,可以在后面加上如下代码:
unlink <b.txt>;
unlink <c.txt>;
或者
unlink "b.txt";
unlink "c.txt";
或者
unlink <b.txt>,<c.txt>;
或者
unlink "b.txt","c.txt";
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
《魔兽世界》大逃杀!60人新游玩模式《强袭风暴》3月21日上线
暴雪近日发布了《魔兽世界》10.2.6 更新内容,新游玩模式《强袭风暴》即将于3月21 日在亚服上线,届时玩家将前往阿拉希高地展开一场 60 人大逃杀对战。
艾泽拉斯的冒险者已经征服了艾泽拉斯的大地及遥远的彼岸。他们在对抗世界上最致命的敌人时展现出过人的手腕,并且成功阻止终结宇宙等级的威胁。当他们在为即将于《魔兽世界》资料片《地心之战》中来袭的萨拉塔斯势力做战斗准备时,他们还需要在熟悉的阿拉希高地面对一个全新的敌人──那就是彼此。在《巨龙崛起》10.2.6 更新的《强袭风暴》中,玩家将会进入一个全新的海盗主题大逃杀式限时活动,其中包含极高的风险和史诗级的奖励。
《强袭风暴》不是普通的战场,作为一个独立于主游戏之外的活动,玩家可以用大逃杀的风格来体验《魔兽世界》,不分职业、不分装备(除了你在赛局中捡到的),光是技巧和战略的强弱之分就能决定出谁才是能坚持到最后的赢家。本次活动将会开放单人和双人模式,玩家在加入海盗主题的预赛大厅区域前,可以从强袭风暴角色画面新增好友。游玩游戏将可以累计名望轨迹,《巨龙崛起》和《魔兽世界:巫妖王之怒 经典版》的玩家都可以获得奖励。
更新日志
- 凤飞飞《我们的主题曲》飞跃制作[正版原抓WAV+CUE]
- 刘嘉亮《亮情歌2》[WAV+CUE][1G]
- 红馆40·谭咏麟《歌者恋歌浓情30年演唱会》3CD[低速原抓WAV+CUE][1.8G]
- 刘纬武《睡眠宝宝竖琴童谣 吉卜力工作室 白噪音安抚》[320K/MP3][193.25MB]
- 【轻音乐】曼托凡尼乐团《精选辑》2CD.1998[FLAC+CUE整轨]
- 邝美云《心中有爱》1989年香港DMIJP版1MTO东芝首版[WAV+CUE]
- 群星《情叹-发烧女声DSD》天籁女声发烧碟[WAV+CUE]
- 刘纬武《睡眠宝宝竖琴童谣 吉卜力工作室 白噪音安抚》[FLAC/分轨][748.03MB]
- 理想混蛋《Origin Sessions》[320K/MP3][37.47MB]
- 公馆青少年《我其实一点都不酷》[320K/MP3][78.78MB]
- 群星《情叹-发烧男声DSD》最值得珍藏的完美男声[WAV+CUE]
- 群星《国韵飘香·贵妃醉酒HQCD黑胶王》2CD[WAV]
- 卫兰《DAUGHTER》【低速原抓WAV+CUE】
- 公馆青少年《我其实一点都不酷》[FLAC/分轨][398.22MB]
- ZWEI《迟暮的花 (Explicit)》[320K/MP3][57.16MB]