使用Excel :: XLSX在Perl中解析电子表格(Using Excel::XLSX to parse a spreadsheet in Perl)

 我使用Perl模块Spreadsheet :: XLSX来解析Excel电子表格。 部分数据如下所示： 
 
    Time        A1      A2      A3      
    0m14m35     0.12    0.13    0.14
    0m29m35     0.15    0.16    0.17
 
 以下是部分代码： 
 
foreach my $row ($sheet->{MinRow} .. $sheet->{MaxRow}) {

    foreach my $col ($sheet->{MinCol} ..  $sheet->{MaxCol}) {

        my $cell = $sheet->{Cells}[$row][$col];
        my $val = $cell->{Val} || "";
    }   
}
 
 问题是时间值转换为浮点数： 
 
 '0m14m35' becomes:  0.0101273148148148
 '0m29m35' becomes:  0.0205439814814815
 
 我如何保持时间字符串是一个字符串？ 
 
 谢谢！ L. 

I am using the Perl module Spreadsheet::XLSX to parse an Excel spreadsheet. Part of the data looks like this:
 
    Time        A1      A2      A3      
    0m14m35     0.12    0.13    0.14
    0m29m35     0.15    0.16    0.17
 
Here's part of the code:
 
foreach my $row ($sheet->{MinRow} .. $sheet->{MaxRow}) {

    foreach my $col ($sheet->{MinCol} ..  $sheet->{MaxCol}) {

        my $cell = $sheet->{Cells}[$row][$col];
        my $val = $cell->{Val} || "";
    }   
}
 
The problem is that the time values are converted to floats:
 
 '0m14m35' becomes:  0.0101273148148148
 '0m29m35' becomes:  0.0205439814814815
 
How can I keep the time string a string?
 
Thanks! L.

原文：https://stackoverflow.com/questions/17576431