小编LKr*_*mer的帖子

Graphviz:如何减少节点的顶部和底部边距?

如何减少这些Graphviz节点的顶部和底部边距?我指定"0.05,0.0作为每个节点的边距,fontsize = 8.

graphviz

5
推荐指数
1
解决办法
4238
查看次数

使用Excel :: XLSX解析Perl中的电子表格

我使用Perl模块Spreadsheet :: XLSX来解析Excel电子表格.部分数据如下所示:

    Time        A1      A2      A3      
    0m14m35     0.12    0.13    0.14
    0m29m35     0.15    0.16    0.17
Run Code Online (Sandbox Code Playgroud)

这是代码的一部分:

foreach my $row ($sheet->{MinRow} .. $sheet->{MaxRow}) {

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

        my $cell = $sheet->{Cells}[$row][$col];
        my $val = $cell->{Val} || "";
    }   
}
Run Code Online (Sandbox Code Playgroud)

问题是时间值转换为浮点数:

 '0m14m35' becomes:  0.0101273148148148
 '0m29m35' becomes:  0.0205439814814815
Run Code Online (Sandbox Code Playgroud)

如何将时间字符串保留为字符串?

谢谢!L.

perl spreadsheet xlsx

3
推荐指数
1
解决办法
3848
查看次数

使用正则表达式进行Perl排序

我有一个像这样的perl数组字符串:

my @arr = ( "gene1 (100)", "gene2 (50)", "gene3 (120)", ... );
Run Code Online (Sandbox Code Playgroud)

如何用括号中的整数对数组进行排序?

regex sorting perl

3
推荐指数
1
解决办法
783
查看次数

首先按字母顺序排序,然后在串联密钥上进行数字排序

给定一组Letter_Number组合,我如何先按字母排序,然后编号:

( B_5   A_11   C_0   A_10    A_1 )
Run Code Online (Sandbox Code Playgroud)

要得到:

( A_1   A_10   A_11   B_5    C_0 )
Run Code Online (Sandbox Code Playgroud)

sorting perl

1
推荐指数
1
解决办法
1587
查看次数

Perl系统命令,多个参数输出到文件

我需要使用以下形式调用系统命令:

system( $cmd, @args );
Run Code Online (Sandbox Code Playgroud)

当我将@args定义为

my @args = ( "input1", "input2", ">", "file.out" );
Run Code Online (Sandbox Code Playgroud)

">"和"file.out"并不像我希望的那样被解释.如何将此形式的系统命令的输出发送到文件?

perl

1
推荐指数
1
解决办法
393
查看次数

标签 统计

perl ×4

sorting ×2

graphviz ×1

regex ×1

spreadsheet ×1

xlsx ×1