岁月联盟 · 中国技术网 本站主页 | 安全认证 | 用户服务 | 技术论坛
新闻快报 | 新手学堂 | 黑客特区 | 程序语言 | 数 据 库 | 防 火 墙 | 路由交换 | 系统集成 | 服 务 器 | 存储备份 | 考试认证
Windows | Linux | Java | 协议分析 | 问题解答 | 进程大全 | 网页设计 | 多 媒 体 | 图库资料 | 软件下载 | 站内下载
  您现在的位置: 岁月联盟 >> Linux频道 >> Linux编程 >> Perl编程 >> Linux频道正文
Perl的经典用法:用Sysopen()进行控制
作者:未知 文章来源:本站整理 点击数: 更新时间:2007-7-10 16:37:22

  为了更好的控制文件的打开方式,可以使用 sysopen() 函数:
  
  use Fcntl;
  
  sysopen(FH, $filename, O_RDWR|O_CREAT, 0666)
  
  or die "Can't open $filename for reading/writing/creating : $!";
  
  函数 sysopen() 带有四个参数,第一个是同open()函数类似的文件句柄参数, 第二个参数是不带模式信息的文件名,第三个参数是模式参数,由Fcntl 模块提供 的逻辑OR运算组合起来的常数构成,第四个参数(可选),为八进制属性值(0666表示 数据文件, 0777表示程序)。如果文件可以被打开,sysopen() 返回true,如果打开失败, 则返回false。
  
  不同于open()函数,sysopen()不提供模式说明的简写方式,而是把一些常数组合起来, 而且,每个模式常数有唯一的含义,只有通过逻辑OR运算才能将它们组合起来,你可以设 置多个行为的组合。
  
  O_RDONLYRead-only
  
  O_WRONLY Write-only
  
  O_RDWR Reading and writing
  
  O_APPEND Writes go to the end of the file
  
  O_TRUNC Truncate the file if it existed
  
  O_CREAT Create the file if it didn't exist
  
  O_EXCLError if the file already existed (used with O_CREAT)
  
  当你需要小心行事的时候,就使用sysopen() 函数,例如,如果你打算添加内容到文件 中,如果文件不存在,不创建新文件,你可以这样写:
  
  sysopen(LOG, "/var/log/myprog.log", O_APPEND, 0666)
  
  or die "Can't open /var/log/myprog.log for appending: $!";


  • 上一个Linux频道:
  • 下一个Linux频道:
  •  
    热门文章
    推荐文章
    关于我们 | 发展历程 | 网站地图 | 广告服务 | 招贤纳士 | 战略合作 | 友情链接 | 著作声明 | 联系我们
    Copyright © 2002-2007 SYUE All rights reserved.
    E_mail:Admin@Syue.Com 皖ICP备05004589号
    未经授权禁止转载、摘编、复制或建立镜像.如有违反,追究法律责任.
    天龙八部私服 传世私服 传奇世界私服 传奇私服 bet365 天龙八部私服 热血江湖私服 英雄合击传奇私服 热血江湖私服 bet365 bet365