perl怎么指定指针为最后一行

1、#!/usr/bin/perl# 以读取方式打开文件，open FILE_HANDLE, "< your_file";# 读出文件所有内容。

2、my @entire_lines = <FILE_HANDLE>;# 关闭文件close FILE_HANDLE; # 将最后一行放到第一行。

3、unshift @entire_lines, pop @entire_lines;# 以写入方式打开文件open FILE_HANDLE, "> 烤恤鹇灭your_file";# 写入，print FILE_HANDLE @entire_lines;关闭文件，close FILE_HANDLE;

4、在文件中向前/后移动，有三个参数：filevar，文件指针，distance，移动的字节数，正数向前移动，负数往回移动，reletive_to，值可为0、1或2。为0时。

5、从文件头开始移动，为1时，相对于当前位置（将要读的下一行）移动，为2时，相对于文件末尾移动。运行成功返回真（非零值），失败则返回零，常与tell函数合用。

6、perl 在操作文件指针时，还有一个按照字节读取的函数--getc(FILEHANDLE) ，该函数将返回一个字节的内容，并且文件指针也移动一个字节，如果用户想直接获得文件的字节数，可以先偏移到文件末尾，再查看当前偏移位置来查看