perl 文件句柄
2016-02-26 20:07
134 查看
#!/usr/bin/perl
use autodie;
open LOG, '>>', 'log_file';
print LOG "first log input\n";
close LOG;
open LOG, '>>', 'log_file';
print LOG "second log input\n";
close LOG;
$| = 1; #使得当前的文件句柄输出立即显示在屏幕上
select STDOUT;
print "sadafd";
open LOG, '>>', 'log_file';
print LOG "dsadadsf";
close LOG;
use autodie;
open LOG, '>>', 'log_file';
print LOG "first log input\n";
close LOG;
open LOG, '>>', 'log_file';
print LOG "second log input\n";
close LOG;
$| = 1; #使得当前的文件句柄输出立即显示在屏幕上
select STDOUT;
print "sadafd";
open LOG, '>>', 'log_file';
print LOG "dsadadsf";
close LOG;
相关文章推荐
- mysql参数设置与查看
- 一个下音乐的方法
- 模拟计算器进行四则运算(同等优先级)(内测第2届第3题)
- 微信现在越来越难开了,有什么办法可以快速开很多微信号呢
- 驾照考试:科目二考试注意事项
- 第一篇博文
- 用V4包中的DrawerLayout实现下拉刷…
- 模仿微信6.0的界面效果
- 自定义的上下拉刷新和SwipeListVie…
- Android获取屏幕宽度与长度的三个…
- 解决ListView在ScrollView中无法展…
- 如何用android sharedprefere…
- Android应用程序中,activity的管…
- perl print 与 加减乘除
- matlab 按照某列以行为单位进行排序
- 处理多个网络请求的并发的情况
- linux 利用 logrotate 管理日志
- 驾照考试:从科目一到科目四,全都是你要了解的!!(全干货)
- PHP Laravel学习实践(一)最出色的php框架,让代码成为艺术
- Object-C文件操作