argra****@users*****
argra****@users*****
2013年 4月 16日 (火) 02:16:13 JST
Index: docs/perl/5.14.1/perlfaq4.pod diff -u docs/perl/5.14.1/perlfaq4.pod:1.1 docs/perl/5.14.1/perlfaq4.pod:1.2 --- docs/perl/5.14.1/perlfaq4.pod:1.1 Thu Jul 12 02:11:11 2012 +++ docs/perl/5.14.1/perlfaq4.pod Tue Apr 16 02:16:11 2013 @@ -4561,9 +4561,17 @@ my $key_count = keys %hash; # must be scalar context! +=begin original + If you want to find out how many entries have a defined value, that's a bit different. You have to check each value. A C<grep> is handy: +=end original + +定義された値のエントリがいくつあるかを知りたい場合は、少し異なります。 +それぞれの値をチェックする必要があります。 +C<grep> が便利です: + my $defined_value_count = grep { defined } values %hash; =begin original @@ -4580,9 +4588,17 @@ my $vowel_count = grep { /[aeiou]/ } keys %hash; +=begin original + The C<grep> in scalar context returns the count. If you want the list of matching items, just use it in list context instead: +=end original + +スカラコンテキストでの C<grep> は個数を返します。 +マッチングしたアイテムのリストが欲しい場合、代わりに単にリストコンテキストで +使います: + my @defined_values = grep { defined } values %hash; =begin original