欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

Perl读写文件简单示例

程序员文章站 2022-03-14 21:21:16
!/usr/bin/perl -w use strict; #print "please input a string\n"; #my $li...

!/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 读写文件