perl跳过首行读取文件的实现代码
来源:爱站网时间:2020-05-07编辑:网友分享
Perl可以使程序变得更加简洁明了,而且我们在实行命令的时候可以编写很多命令,今天爱站技术频道将为大家带来已经实现了的内容,一起进入下文了解perl跳过首行读取文件的实现代码吧。
Perl可以使程序变得更加简洁明了,而且我们在实行命令的时候可以编写很多命令,今天爱站技术频道将为大家带来已经实现了的内容,一起进入下文了解perl跳过首行读取文件的实现代码吧。
#!/usr/bin/perl
open( READ, " readline READ; # skip the first line
while (
my ( $id, $axis1, $axis2, $axis3, $value ) = split / /;
$line = sprintf ( "%d %d %d %d %d %d",
$id, $axis1, $axis2, $axis3, $value, $axis1 + $axis2 );
print WRITE $line;
}
close READ;
这里说说我自己的想法,挺笨的:
直接定义标量变量运行一遍: my $skipfirst =
perl跳过首行读取文件的实现代码爱站技术频道就为大家介绍到这里了,相信大家参考上面的内容,可以更好的认识perl的专业知识。