perl 读文件跳过第一行

open READ,"<","G:/project-xiaomai/yourfile.txt";

readline READ; # skip the first line

while (<READ>)
{
　　print $_;
}
close READ;