📌  相关文章
📜  Perl创建Excel文件

📅  最后修改于: 2021-01-07 08:43:57             🧑  作者: Mango

具有Excel文件的Perl

Perl有几个模块可以处理excel文件。它能够处理所有类型的电子表格。您可以在Perl的帮助下轻松创建或读取Excel文件。

Perl创建Excel文件

要创建一个excel文件，我们将使用Perl模块Excel :: Writer :: XLSX 。此模块的excel文件扩展名为(.xlsx)。

我们正在使用上述模块创建一个excel文件myExcel.xlsx。首先，我们需要加载模块。在新的构造函数中，我们将传递正在创建的文件名。新构造函数的输出存储在$ workbook中。

Excel文件由一张或多张纸组成。在这些表上找到数据。我们通过调用$ workbook对象的add_worksheet()方法来创建表格。它的返回值存储在$ worksheet中。

write方法将数据添加到工作表。每个调用都有两个参数。在excel中，行从1标记，列从字母A，B，C等标记。

最后，我们关闭文件。但这在Perl中不是必需的，因为它会在脚本结束时自动关闭文件。

#!/usr/bin/perl
use strict;
use warnings; 
use Excel::Writer::XLSX;
my $workbook= Excel::Writer::XLSX->new( 'myExcel.xlsx' );
my $worksheet = $workbook->add_worksheet();
$worksheet->write( "A1", "Excel file generated!" );
$worksheet->write( "A2", "This is the second row" );
$workbook->close;

输出：

在Excel中添加Perl公式

现在，我们将使用乘法print2的表。 A列将print2的表。

#!/usr/bin/perl
use strict;
use warnings;
use Excel::Writer::XLSX;
my $workbook  = Excel::Writer::XLSX->new( 'myExcel.xlsx' );
my $worksheet = $workbook->add_worksheet();
$worksheet->write( "A1", 2 );
$worksheet->write( "A2", "=A1*2" );
$worksheet->write( "A3", "=A1*3" );
$worksheet->write( "A4", "=A1*4" );
$worksheet->write( "A5", "=A1*5" );
$worksheet->write( "A6", "=A1*6" );
$worksheet->write( "A7", "=A1*7" );
$worksheet->write( "A8", "=A1*8" );
$worksheet->write( "A9", "=A1*9" );
$worksheet->write( "A10", "=A1*10" );
$workbook->close;

输出：