perl文件操作学习-创新互联
现有文件hello.txt,内容为:"你好'\n' 我是中国人"
目前创新互联公司已为上1000家的企业提供了网站建设、域名、网页空间、网站托管、企业网站设计、徽县网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。1,打开文本hello.txt
#!/usr/bin/perl
open f,"hello.txt";
f 为文件句柄,指向打开的文件
2,逐行读取文本hello.txt
#!/usr/bin/perl
open f,"< hello.txt";
while($line=
print $line;
}
close f;
结果:你好
我是中国人
或者:print
结果:你好
我是中国人
<> 为取行操作符
3,向a.txt中写入内容
#!/usr/bin/perl
open f,">a.txt";
print f "hello,world\nsee you\n";
close f;
如果a.txt原本有内容,则原内容将会被擦除,a.txt的内容为
hello,world
see you
4,向a.txt中追加内容
#!/usr/bin/perl
open f,">>a.txt";
print f "thank you\n";
close f;
a.txt的内容为
hello,world
see you
thank you
print 相当于写命令,别丢了语句结尾的 “;"
另外有需要云服务器可以了解下创新互联scvps.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。
新闻名称:perl文件操作学习-创新互联
转载来于:http://ybzwz.com/article/csojec.html