当前位置: 首页 > 文档资料 > Perl 入门教程 >

tell

优质
小牛编辑
138浏览
2023-12-01

描述 (Description)

此函数返回指定FILEHANDLE内读指针的当前位置(以字节为单位)。 如果省略FILEHANDLE,则返回最后访问的文件中的位置。

语法 (Syntax)

以下是此函数的简单语法 -

tell FILEHANDLE
tell

返回值 (Return Value)

此函数以字节为单位返回当前文件位置。

例子 (Example)

以下是显示其基本用法的示例代码,检查此功能是否执行以下操作 -

  • 创建一个文本文件,将“this is test”作为内容并将其存储到/ tmp目录中。

  • 从此文件中读取2个字符。

  • 现在检查文件中读指针的位置。

#!/usr/bin/perl -w
open( FILE, "</tmp/test.txt" ) || die "Enable to open test file";
$char = getc( FILE );
print "First Character is $char\n";
$char = getc( FILE );
print "Second Character is $char\n";
# Now check the position of read pointer.
$position = tell( FILE );
print "Position with in file $position\n";
close(FILE);

执行上述代码时,会产生以下结果 -

First Character is E
Second Character is O
Position with in file 2