containsは標準でほしい。ブログ主のコードは読むの苦痛ではないが、中にはLogicにまんまループ書く人がいてイライラする / 短絡しないが sub find{my ($x, ＠ys)=＠_;(grep{$_ eq $x}＠ys)?$x:return}my ＠xs=qw/3 1 4 1 5 9 2 6 5 3 5/;print find(6,＠xs)

kiyo_hiko のブックマーク 2011/12/15 16:50

<blockquote class="hatena-bookmark-comment"><a class="comment-info" href="https://b.hatena.ne.jp/entry/72164257/comment/kiyo_hiko" data-user-id="kiyo_hiko" data-entry-url="https://b.hatena.ne.jp/entry/www.deftrash.com/blog/archives/2009/10/perl_contains.html" data-original-href="http://www.deftrash.com/blog/archives/2009/10/perl_contains.html" data-entry-favicon="https://cdn-ak2.favicon.st-hatena.com/64?url=http%3A%2F%2Fwww.deftrash.com%2Fblog%2Farchives%2F2009%2F10%2Fperl_contains.html" data-user-icon="/users/kiyo_hiko/profile.png">perl で配列に要素が含まれているか調べる方法 | dTblog | デザインとプログラムの境界をさまようブログ</a><ul class="comment-tag" style="list-style: none; margin: 0px;"><li style="float: left">[<a href="https://b.hatena.ne.jp/q/%E7%99%BA%E6%98%8E">発明</a>]</li><li style="float: left">[<a href="https://b.hatena.ne.jp/q/perl">perl</a>]</li><li style="float: left">[<a href="https://b.hatena.ne.jp/q/tips">tips</a>]</li><li style="float: left">[<a href="https://b.hatena.ne.jp/q/list">list</a>]</li></ul><br><p style="clear: left">containsは標準でほしい。ブログ主のコードは読むの苦痛ではないが、中にはLogicにまんまループ書く人がいてイライラする / 短絡しないが sub find{my ($x, ＠ys)=＠_;(grep{$_ eq $x}＠ys)?$x:return}my ＠xs=qw/3 1 4 1 5 9 2 6 5 3 5/;print find(6,＠xs)</p><a class="datetime" href="https://b.hatena.ne.jp/kiyo_hiko/20111215#bookmark-72164257"><span class="datetime-body">2011/12/15 16:50</span></a></blockquote><script src="https://b.st-hatena.com/js/comment-widget.js" charset="utf-8" async></script>

このブックマークにはスターがありません。
最初のスターをつけてみよう！