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

发布时间：2020-12-14 05:37:56 所属栏目：百科来源：网络整理

导读：我有一个像这样的perl数组字符串： my @arr = ( "gene1 (100)","gene2 (50)","gene3 (120)",... ); 如何用括号中的整数对数组进行排序？解决方法这显示了直截了当的方式.排序块将$aa和$bb分别设置为$a和$b中的数字值.然后 =用于数字比较它们. 除非基本技术

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

my @arr = ( "gene1 (100)","gene2 (50)","gene3 (120)",... );

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

解决方法

这显示了直截了当的方式.排序块将$aa和$bb分别设置为$a和$b中的数字值.然后< =>用于数字比较它们.

除非基本技术证明太慢,否则不需要更加模糊的转换方法.

use strict;
use warnings;
use 5.010;

my @arr = ( "gene1 (100)",);

my @sorted = sort {
  my ($aa) = $a =~ / (  (d+)  ) /x;
  my ($bb) = $b =~ / (  (d+)  ) /x;
  $aa <=> $bb;
} @arr;

say for @sorted;

产量

gene2 (50)
gene1 (100)
gene3 (120)

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!