root/websites/perl-users.jp/ttroot/modules/list_moreutils.html @ 17109

[% WRAPPER modern_introduction_perl/wrapper.tt,
    title => "List::MoreUtils - モダンなPerl入門",
    last_modified => '$Date: 2008-05-22T09:21:23.154313Z $'
-%]
[%- USE Markdown -%][%- FILTER markdown -%]

リスト処理
==============================================================================

List::Utilでできないリスト操作はList::MoreUtils を覗くと見つかるかも

### つかいかた

    use strict;
    use warnings;
    use List::MoreUtils qw(any all);

List::MoreUtilもメソッドをExportしないから注意が必要です。
使いたいものだけExportするか

    use List::MoreUtils qw(:all);

で全部Exportして使えます。

### any

    $v = any {$_ < 10} 1..10; # 真

リストを評価して要素の一つでも条件を満たすと真、満たさなかったら偽を返します。
リストが空ならundefを返します。

### all

    $v = all {$_ < 10} 1..10; # 偽

リストを評価して全ての要素が条件を満たすと真、満たさなかったら偽を返します。
リストが空ならundefを返します。

### none 

    $v = none {$_ < 10} 1..10; # 偽

リストを評価して全て要素が条件を満たさなかったら真、一つでも満たしたら偽を返します。
リストが空ならundefを返します。
anyの逆です。

### notall

    $v = notall {$_ < 10} 1..10; # 真

リストを評価して一つでも要素が条件を満たさなかったら真、全て満たしたら偽を返します。
リストが空ならundefを返します。
allの逆です。

### true

    $v = true {$_ < 10} 1..10; #9

リストを評価して条件を満たした要素数を返します。

### false

    $v = true {$_ < 10} 1..10; #1

リストを評価して条件を満たさなかった要素数を返します。


他にもたくさんあります。

[%- END -%][%- END -%]