perl的open函数
来源:互联网 发布:免费域名 知乎 编辑:程序博客网 时间:2024/06/05 20:53
在Perl中可以用open或者sysopen函数来打开文件进行操作,这两个函数都需要通过一个文件句柄(即文件指针)来对文件进行读写定位等操作。
下面以open函数为例:
1:读:open(文件句柄,"<文件名")/open(文件句柄,"文件名"),前提文件必须已经存在,否则会返回0,出错信息在$!中。
2:写:open(文件句柄,">文件名"),文件如果不存在,那么创建之,如果存在,内容被清空,长度截为0,$!中有出错信息。
3:追加:open(文件句柄,">>文件名"),基本同写,但有一点,文件中的内容不会被清空,新的内容会追加到原文后面。
4:读写:open(文件句柄,"+<文件名"),通过“+<”模式,你可以既可以读文件,又可以写文件。你可以通过tell() 函数在文件内部移动,通过seek()函数进行定位。如果文件不存在,就会被创建。如果文件已经存在,原来的数据不会被清除。
open(文件句柄,"+>文件名"),通过“+》”模式,可以同时读写文件,但与上面不同的是,它是破怀性写,会清除原来的内容。
例子:
my $conf = "D:/test.txt";
if(-e $conf) #判断文件是否存在
{
open(FILE, "<$conf") or die("No such file");
while($LINE = <FILE>) #读取文件
{
print $LINE;
push(@del,$LINE);
}
close(FILE);
下面以open函数为例:
1:读:open(文件句柄,"<文件名")/open(文件句柄,"文件名"),前提文件必须已经存在,否则会返回0,出错信息在$!中。
2:写:open(文件句柄,">文件名"),文件如果不存在,那么创建之,如果存在,内容被清空,长度截为0,$!中有出错信息。
3:追加:open(文件句柄,">>文件名"),基本同写,但有一点,文件中的内容不会被清空,新的内容会追加到原文后面。
4:读写:open(文件句柄,"+<文件名"),通过“+<”模式,你可以既可以读文件,又可以写文件。你可以通过tell() 函数在文件内部移动,通过seek()函数进行定位。如果文件不存在,就会被创建。如果文件已经存在,原来的数据不会被清除。
例子:
my $conf = "D:/test.txt";
if(-e $conf)
{
0 0
- perl的open函数
- Perl的Open函数
- perl的open函数
- perl的open函数
- perl open函数的使用
- perl open函数打开管道
- perl open
- Perl中open的用法总结
- Perl的replace函数
- Perl 的函数原型
- perl 的select 函数
- perl 的select 函数
- perl的splice函数
- perl的map函数
- perl的map函数
- perl的map函数
- perl的map函数
- perl的时间函数
- php入库安全问题
- 海尔商城是如何做的
- <Java语言>值传递与引用
- 值得收藏——开发者应该了解的API技术清单!
- fedola 20 安装flash插件
- perl的open函数
- vs2010+qt5.3.2环境的搭建
- 数据结构绪论思维导图
- android 增加一个新的硬按键
- 总结
- 实模式和保护模式区别及寻址方式
- 扩充cmd的工具
- 14.9.29 很头痛,为什么imageview到了button上面程序就不能正常运行
- 2014-9-29 今天回家--烦躁的心路历程