用新行将数组输出写入perl

Question

我从子程序获得

的输出

 @ outputarray

outputarray[0]=name  ip  port 
outputarray[1]=------------------------------------ 
outputarray[2]=http-listener-1  *   6712
outputarray[3]=http-listener-2  *   4743
...... etc

我想创建一个新文件并写入文件log.txt，其中文件内容如下所示，并删除文件log.txt如何在perl中实现此目的？

 name ip port 
------------------------------------ 
http-listener-1 *      6712 
http-listener-2 *      4743

由于

Answer 1

如何打开文件并向其打印数组：

open my $fh, ">", "log.txt" or die $!;
print $fh "$_\n" for @outputarray;
close $fh;

如何删除该文件：

unlink "log.txt" or die $!;

为什么你想先打印然后删除那个文件，我不知道。