List::Utilでできないリスト操作はList::MoreUtils を覗くと見つかるかも
use strict;
use warnings;
use List::MoreUtils qw(any all);
List::MoreUtilもメソッドをExportしないから注意が必要です。 使いたいものだけExportするか
use List::MoreUtils qw(:all);
で全部Exportして使えます。
$v = any {$_ < 10} 1..10; # 真
リストを評価して要素の一つでも条件を満たすと真、満たさなかったら偽を返します。 リストが空ならundefを返します。
$v = all {$_ < 10} 1..10; # 偽
リストを評価して全ての要素が条件を満たすと真、満たさなかったら偽を返します。 リストが空ならundefを返します。
$v = none {$_ < 10} 1..10; # 偽
リストを評価して全て要素が条件を満たさなかったら真、一つでも満たしたら偽を返します。 リストが空ならundefを返します。 anyの逆です。
$v = notall {$_ < 10} 1..10; # 真
リストを評価して一つでも要素が条件を満たさなかったら真、全て満たしたら偽を返します。 リストが空ならundefを返します。 allの逆です。
$v = true {$_ < 10} 1..10; #9
リストを評価して条件を満たした要素数を返します。
$v = true {$_ < 10} 1..10; #1
リストを評価して条件を満たさなかった要素数を返します。
他にもたくさんあります。
Last modified: $Date: 2008-05-22T09:21:23.154313Z $