首页 > 其他 > 详细

第一章:read/sysread/print/syswrite区别

时间:2017-02-19 22:43:56      阅读:453      评论:0      收藏:0      [点我收藏+]
 1 use strict;
 2 use warnings;
 3 
 4 
 5 #将读入的内容添加到原字符串后面
 6 my $buffer=START:;
 7 my $byts = sysread(STDIN,$buffer, 10, length($buffer));
 8 #my $byts = read(STDIN,$buffer, 10, length($buffer));
 9 print $buffer,"\n";
10 
11 #将字符串添加到文件后面
12 open(FD, ">1.txt");
13 syswrite(FD,$buffer,10,2);
14 close(FD);
15  
#sysread无缓冲/read有缓冲
#print有缓冲/syswrite无缓冲
#systead可设置追加偏移量
#syswrite可设置写入长度与开始写入的位置

 

第一章:read/sysread/print/syswrite区别

原文:http://www.cnblogs.com/perl6/p/6417572.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!