如何在Perl中使用Excel:：Writer:：XLSX编写hh:mm:ss.fff
我正在用Perl生成一个报告。报告已生成，但遗憾的是格式不正确，带有额外的撇号如何在Perl中使用Excel:：Writer:：XLSX编写hh:mm:ss.fff,perl,Perl,我正在用Perl生成一个报告。报告已生成，但遗憾的是格式不正确，带有额外的撇号“ 从mysql获取的数组：$month[$i][7]（注意：该列使用的是time（3）类型。示例：00:22:12.212） 用于将数据写入excel的Perl命令：$sheet1->write（$row，7，$month[$i][7]，$format1）#7 列的格式： my $format1 = $workbook->add_format( center_across => 1, bold =>
“- 从mysql获取的数组：
（注意：该列使用的是$month[$i][7]
类型。示例：time（3）
）00:22:12.212 - 用于将数据写入excel的Perl命令：
$sheet1->write（$row，7，$month[$i][7]，$format1）#7 - 列的格式：
my $format1 = $workbook->add_format( center_across => 1, bold => 0, size => 11, border => 1, text_wrap => 1, color => 'black', bg_color => '#ffffff', num_format => 'hh:mm:ss.000', align => 'center', valign => 'vcenter');
我很抱歉，因为前面的问题不清楚，我的英语也不好
谢谢大家的支持 这是一个定制的Excel。单引号
“#!/usr/bin/perl
$string = "002212212"; # => 00:22:12.212
$string =~ s/^(\d{2})(\d{2})(\d{2})(\d{3})/$1:$2:$3.$4/;
print $string, "\n\n";
您可以尝试使用而不是
write$month[$i][7]00:22:12.212$worksheet1->write("A2","00:22:12.212",$datablank);
- 文本大小为1且颜色为白色的格式。这样，列A2将看起来像空的。（不要再写入A2列）
my$datablank=$workbook->add\u格式( 粗体=>0， 大小=>1， 边框=>0， text_wrap=>1， 颜色=>“白色”， num_format=>'[h]：mm:ss.000' );
TIMEVALUE$worksheet1->write_formula("A1","=TIMEVALUE(A2)",$datatimeformat);
- 格式：
my$datatimeformat=$workbook->add\u格式( 中心横截面=>1， 粗体=>0， 大小=>11， 边框=>1， text_wrap=>1， 颜色=>“黑色”， bg_color=>“#ffffff”， num_format=>“hh:mm:ss.000”， align=>“居中”， valign=>“vcenter”）
注意：我们应该使用A1列中的值来绘制图表 您尝试的示例代码对于了解我们如何帮助您是必要的。我建议使用正则表达式。嗨，大卫，我已经编辑了我的问题。请帮助解决我的问题。@RafaelNguyen如果你在评论中回答人们，你需要在他们的名字前面添加一个
@@simbabque\d参数“00:01:44.375000”不是数字加号（+），位于/usr/local/lib/perl5/site\u perl/5.16.3/Excel/Writer/XLSX/Worksheet.pm第2190行从表中选择秒到秒时间（avg（timediff（column1，column2））date（5）00:01:04.375000：”