Perl创建Excel文件

本文概述

• Perl创建Excel文件
• 在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公式

现在, 我们将使用乘法打印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;

输出