我正在尝试将 Linux 系统命令分配top -n1给一个数组，然后消除写入文本文件的前七行文本。当我从我的数组中打印元素时，我收到一条错误消息，指出使用了未初始化的值。将我的阵列分配给系统命令时，有人可以显示我做错了什么吗？谢谢你。
编辑：我还可以添加，我希望通过使用数组切片来删除前七行。
sub processlist
{
my $num_of_lines = 0;
my @top_command = `top -bn1 >toptmp.txt`;
#opening temp file, and output file.
open(my $in, '<' , "toptmp.txt") or die "Can't read the file: $!"; #file used for initial reading
open(my $out, '>', "top.txt") or die "can't write to file: $!";
print $top_command[0], "\n";
#looping deleting first 7 lines
while(<$in>)
{
if($num_of_lines > 6) #starts writing to top.txt past line 7 (counting starts at 0)
{
print $out $_;
}
$num_of_lines++;
}
close $out;
close $in;
system("rm toptmp.txt"); #erasing tmp file.
}