LinuxSir.cn,穿越时空的Linuxsir!

 找回密码
 注册
搜索
热搜: shell linux mysql
查看: 1003|回复: 2

求教 getc

[复制链接]
发表于 2006-6-7 13:52:04 | 显示全部楼层 |阅读模式
#!/usr/bin/perl

open(FILE,"/etc/fstab") or die "could not open /etc/fstab!";
print (getc(FILE),"");
$a=getc(FILE);
print "$a";
print (getc(FILE));
print (getc(FILE)."\n");

[root@freedom ~]# ./temp
# Th

怎么是这个结果??getc 返回的是什么阿??请大虾指教一下
发表于 2006-6-9 13:18:39 | 显示全部楼层
getc()获取文件中一个字符,并返回一个字符。
print (getc(FILE),"");#取得一个字符'#'并且返回
$a=getc(FILE);
print "$a"; #获得文件中第二个字符,并打印

print (getc(FILE));#第三个字符
print (getc(FILE)."\n");#第四个字符,并且换行
回复 支持 反对

使用道具 举报

 楼主| 发表于 2006-6-9 19:54:23 | 显示全部楼层
谢了,剑心兄弟
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表