perl学习笔记七----文件
2007-05-28 13:21
387 查看
文件和文件夹
一 打开/关闭文件
open(file_handle,"file_path")
close(file_handle)
二 读文件
语句$line = <MYFILE>;从文件中读取一行数据存储到简单变
量$line中并把文件指针向后移动一行。
语句@array = <MYFILE>;把文件的全部内容读入数组@array,
文件的每一行(含回车符)为@array的一个元素。
三 写文件
open(file_handle,">file_patch")写入的数据覆盖原先的数据
open(file_handle,">>file_patch")写入的数据追加原先的数据后
写入
print file_handle data
四 文件测试
语法 if(-para file)
para有如下几种:
-b 是否为块设备
-c 是否为字符设备
-d 是否为目录
-e 是否存在
-f 是否为普通文件
-g 是否设置了setgid位
-k 是否设置了sticky位
-l 是否为符号链接
-o 是否拥有该文件
-p 是否为管道
-r 是否可读
-s 是否非空
-t 是否表示终端
-u 是否设置了setuid位
-w 是否可写
-x 是否可执行
-z 是否为空文件
-A 距上次访问多长时间
-B 是否为二进制文件
-C 距上次访问文件的inode多长时间
-M 距上次修改多长时间
-O 是否只为“真正的用户”所拥有
-R 是否只有“真正的用户”可读
-S 是否为socket
-T 是否为文本文件
-W 是否只有"真正的用户"可写
-X 是否只有"真正的用户"可执行
五 打开/关闭目录
opendir(dir_handle,"patch")
close(dir_handle)
六 读取目录
@file=readir(dir_handle)
一 打开/关闭文件
open(file_handle,"file_path")
close(file_handle)
二 读文件
语句$line = <MYFILE>;从文件中读取一行数据存储到简单变
量$line中并把文件指针向后移动一行。
语句@array = <MYFILE>;把文件的全部内容读入数组@array,
文件的每一行(含回车符)为@array的一个元素。
三 写文件
open(file_handle,">file_patch")写入的数据覆盖原先的数据
open(file_handle,">>file_patch")写入的数据追加原先的数据后
写入
print file_handle data
四 文件测试
语法 if(-para file)
para有如下几种:
-b 是否为块设备
-c 是否为字符设备
-d 是否为目录
-e 是否存在
-f 是否为普通文件
-g 是否设置了setgid位
-k 是否设置了sticky位
-l 是否为符号链接
-o 是否拥有该文件
-p 是否为管道
-r 是否可读
-s 是否非空
-t 是否表示终端
-u 是否设置了setuid位
-w 是否可写
-x 是否可执行
-z 是否为空文件
-A 距上次访问多长时间
-B 是否为二进制文件
-C 距上次访问文件的inode多长时间
-M 距上次修改多长时间
-O 是否只为“真正的用户”所拥有
-R 是否只有“真正的用户”可读
-S 是否为socket
-T 是否为文本文件
-W 是否只有"真正的用户"可写
-X 是否只有"真正的用户"可执行
五 打开/关闭目录
opendir(dir_handle,"patch")
close(dir_handle)
六 读取目录
@file=readir(dir_handle)
相关文章推荐
- Perl学习笔记(8) -- 模块的使用和文件测试
- [perl学习笔记]文件操作之文件的读写
- 【perl】学习笔记(五)--文件读写
- Perl语言学习笔记 12 文件测试
- perl重点学习笔记之目录文件操作
- Perl学习笔记二: 尝试优化文件读取
- Perl 学习笔记-文件测试
- Perl学习笔记之文件操作
- Perl学习笔记(4)文件的输出输入
- Perl学习笔记三: 再次尝试优化文件I/O
- Perl中的文件读写学习笔记
- perl学习笔记八——文件读写
- Centos学习笔记---文件搜索命令
- [Linux] Linux学习笔记(5)-文件与目录管理
- python学习笔记-批量添加OC文件前缀
- python学习笔记-解决OC文件重名冲突
- struts2学习笔记--上传单个和批量文件示例
- lucene学习笔记:三,Lucene的索引文件格式
- Linux学习笔记(二)Linux文件系统结构
- ROS学习笔记二:探索ROS文件系统