Perl Excel文件
Perl 和 Excel 文件
Perl 很少有模块可以处理 Excel 文件。它能够处理所有类型的电子表格。借助 Perl，您可以非常轻松地创建或读取 Excel 文件。
Perl 创建 Excel 文件
要创建 Excel 文件，我们将使用 Perl 模块 Excel::Writer::XLSX。此模块的 excel 文件扩展名为(.xlsx)。
我们正在使用上述模块创建一个 excel 文件 myExcel.xlsx。首先我们需要加载模块。在 new 构造函数中，我们将传递我们正在创建的文件名。新构造函数的输出存储在$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;
输出:
Perl 在 Excel 中添加公式
现在，我们将使用乘法打印 2 的表格。 A 列将打印 2 的表格。
#!/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;
输出:
