本文概述
- Perl创建Excel文件
- 在Excel中添加Perl公式
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;
【Perl创建Excel文件】输出
文章图片
推荐阅读
- Perl哈希用法详解
- Perl goto语句
- Perl for循环语句
- Perl函数和子例程
- Perl第一个例子
- Perl文件处理用法和实例
- 进阶开发(Perl目录全解)
- Perl错误处理
- Perl do-while循环