我注意到Spreadsheet :: XLSX模块的行为不一致,具体取决于它的安装方式。 当通过/ usr / bin / cpan安装在OpenSUSE上时,它从Excel 2007工作表中的单元格中读取date: $VAR1 = bless({ 'Format' => 'yyyy-mm-dd', 'Val' => '2016-01-04', '_Value' => '2016-01-04', 'Type' => 'Date' }, 'Spreadsheet::ParseExcel::Cell' ) 这是正确的。 但是,在从OpenSuSE存储库安装为RPM的计算机上,读取同一张表单的相同单元的相同代码返回: $VAR1 = bless({ 'Type' => 'Date', 'Format' => 'md-yy', 'Val' => '42373', '_Value' => '1-4-16' }, 'Spreadsheet::ParseExcel::Cell' ); 对我来说,看起来好像在我自己的机器上编译的代码包含不同的默认值,或者至less以不同于分发维护者编译的方式读取表单。 它看起来像编写依赖于编译时环境的代码的原始作者,编译非可移植代码的分发维护者,还是决定将编译时环境相关代码作为RPM包含在存储库中的人的错误? 我不想责怪任何人,只是想知道,我应该在哪里提交错误报告。
在Spreadsheet :: WriteExcel中组合格式对象 我有一个格式对象设置背景颜色,第二个设置数字格式。 如果我申请一个,那么另一个申请一个细胞,第二个消灭第一个细胞的效应。 即它们是相互排斥的。 有没有一种很好的方法来结合他们?
在我的Perl脚本中,我使用Spreadsheet :: WriteExcel模块创build一个Excel文件。 该文件包含一个表,其大小是dynamic的 – 即,我不知道有多less行,直到表已被创build。 我希望表格的最后一行有一个稍微不同的格式(例如,它的下边框是“===”)。 不幸的是,当行被创build时,我不能应用这种(不同的)格式,因为那个时候我还不知道它会是最后一行。 所以,我的问题是:我可以改变已经存在的单元格的格式而不改变它的内容吗? 如果我将undef作为单元格的值传递给$worksheet->write()方法,它只是用空白单元格覆盖单元格的内容。
我已经安装了Perl 5.6.1版本。 但是它不支持Date :: Calc 。 所以我安装了5.10.0。 现在我正在编写一个程序,使用Perl在Excel中写入数据。 为此,我必须使用Spreadsheet :: WriteExcel,但是在安装ActiveState Perl时未安装Spreadsheet :: WriteExcel 。 那么现在我必须安装另一个版本的Perl或Spreadsheet :: WriteExcel吗? 如果Spreadsheet :: WriteExcel足够了,我到底要做什么?
我有一个巨大的报告来自一个工具,我从中提取一些重要的数据,并写一个Excel文件。 到目前为止,我使用了模块Spreadsheet :: WriteExcel,但是当行数超过65535时,它崩溃了。有没有其他模块支持为大数据生成excel? 我检查了CPAN,发现读取excel2007文件的模块,但没有find一个写作。 我不写一个csv,因为我想在excel文件中生成多个工作表。
我正在编写一个Perl脚本,它将数据写入Excel文件。 我正在使用Excel::Writer::XLSX来执行此操作。 我希望编写脚本,然后把它交给我的团队的其他成员,这样我们就可以在需要的时候使用它来编译数据。 我有几个关于这个问题: 我的同事是否需要安装该模块才能使脚本正常工作? 如果不是的话,我怎样用脚本包装这个模块才能给它们? 有没有更好的方式来做到这一点,使用我select的模块?
我一直在使用Spreadsheet :: ParseExcel列出电子表格的内容。 我已经看到了几个关于如何转储整个电子表格的例子。 我真的很想看看如何更有select地使用这个脚本。 IBM下面的例子基本上转储了所有有数据的单元格的内容。 #!/usr/bin/perl -w use strict; use Spreadsheet::ParseExcel; my $oExcel = new Spreadsheet::ParseExcel; die "You must provide a filename to $0 to be parsed as an Excel file" unless @ARGV; my $oBook = $oExcel->Parse($ARGV[0]); my($iR, $iC, $oWkS, $oWkC); print "FILE :", $oBook->{File} , "\n"; print "COUNT :", $oBook->{SheetCount} , "\n"; print […]