Perl读写文件的事例演示

来源:爱站网时间:2019-08-01编辑:网友分享
在Perl中,open或sysopen函数可用于打开文件进行操作,这两个函数都需要文件指针来读取、写入和定位,爱站技术频道小编将和大家分享Perl读写文件的事例演示,一起来看看吧!

Perl中,open或sysopen函数可用于打开文件进行操作,这两个函数都需要文件指针来读取、写入和定位,爱站技术频道小编将和大家分享Perl读写文件的事例演示,一起来看看吧!

!/usr/bin/perl -w
 use strict;
 
 #print "please input a string\n";
 #my $line = <STDIN>;
 #print $line;
 
 #wirte a file
 open(FH, ">aa.txt") or die $!; 
 print FH "hello\n";#向文件写入内容
 print FH "OK\n";
 
 close(FH);
 
 #open a file
 open(FH, "aa.txt") or die $!;
 my @f = <FH>;#将文件内容读出
 print @f;
 
 close(FH);

Perl读写文件的事例演示,爱站技术频道小编就为各位朋友们整理到这里了。大家有没有仔细的记住上文中的内容呢,这样可以应对工作中出现的问题。

上一篇:Perl 批量添加Copyright版权信息的方法

下一篇:Perl中的10个操作日期和时间的CPAN模块介绍

您可能感兴趣的文章

相关阅读

查看更多 >

热门软件源码

最新软件源码下载