CINXE.COM

List::Util - A selection of general-utility list subroutines - Perldoc Browser

<!DOCTYPE html> <html lang="en"> <head> <meta charset="utf-8"> <meta http-equiv="X-UA-Compatible" content="IE=edge"> <meta name="viewport" content="width=device-width, initial-scale=1"> <title>List::Util - A selection of general-utility list subroutines - Perldoc Browser</title> <link rel="search" href="/opensearch.xml" type="application/opensearchdescription+xml" title="Perldoc Browser"> <link rel="canonical" href="https://perldoc.perl.org/List::Util"> <link rel="stylesheet" href="https://stackpath.bootstrapcdn.com/bootstrap/4.5.2/css/bootstrap.min.css" integrity="sha384-JcKb8q3iqJ61gNV9KGb8thSsNjpSL0n8PARn9HuZOnIxN0hoP+VmmDGMN5t9UJ0Z" crossorigin="anonymous"> <link rel="stylesheet" href="https://cdnjs.cloudflare.com/ajax/libs/highlight.js/10.5.0/styles/stackoverflow-light.min.css" integrity="sha512-cG1IdFxqipi3gqLmksLtuk13C+hBa57a6zpWxMeoY3Q9O6ooFxq50DayCdm0QrDgZjMUn23z/0PMZlgft7Yp5Q==" crossorigin="anonymous" /> <style> body { background: #f4f4f5; color: #020202; } .navbar-dark { background-image: -webkit-linear-gradient(top, #005f85 0, #002e49 100%); background-image: -o-linear-gradient(top, #005f85 0, #002e49 100%); background-image: linear-gradient(to bottom, #005f85 0, #002e49 100%); filter: progid:DXImageTransform.Microsoft.gradient(startColorstr='#ff005f85', endColorstr='#ff002e49', GradientType=0); background-repeat: repeat-x; } .navbar-dark .navbar-nav .nav-link, .navbar-dark .navbar-nav .nav-link:focus { color: #fff } .navbar-dark .navbar-nav .nav-link:hover { color: #ffef68 } #wrapperlicious { margin: 0 auto; font: 0.9em 'Helvetica Neue', Helvetica, sans-serif; font-weight: normal; line-height: 1.5em; margin: 0; padding: 0; } #wrapperlicious h1 { font-size: 1.5em } #wrapperlicious h2 { font-size: 1.3em } #wrapperlicious h3 { font-size: 1.1em } #wrapperlicious h4 { font-size: 0.9em } #wrapperlicious h1, #wrapperlicious h2, #wrapperlicious h3, #wrapperlicious h4, #wrapperlicious dt { color: #020202; margin-top: 1em; margin-bottom: 1em; position: relative; font-weight: bold; } #wrapperlicious a { color: inherit; text-decoration: underline } #wrapperlicious #toc { text-decoration: none } #wrapperlicious a:hover { color: #2a2a2a } #wrapperlicious a img { border: 0 } #wrapperlicious :not(pre) > code { color: inherit; background-color: rgba(0, 0, 0, 0.04); border-radius: 3px; font: 0.9em Consolas, Menlo, Monaco, monospace; padding: 0.3em; } #wrapperlicious dd { margin: 0; margin-left: 2em; } #wrapperlicious dt { color: #2a2a2a; font-weight: bold; margin-left: 0.9em; } #wrapperlicious p { margin-bottom: 1em; margin-top: 1em; } #wrapperlicious li > p { margin-bottom: 0; margin-top: 0; } #wrapperlicious pre { border: 1px solid #c1c1c1; border-radius: 3px; font: 100% Consolas, Menlo, Monaco, monospace; margin-bottom: 1em; margin-top: 1em; } #wrapperlicious pre > code { display: block; background-color: #f6f6f6; font: 0.9em Consolas, Menlo, Monaco, monospace; line-height: 1.5em; text-align: left; white-space: pre; padding: 1em; } #wrapperlicious dl, #wrapperlicious ol, #wrapperlicious ul { margin-bottom: 1em; margin-top: 1em; } #wrapperlicious ul { list-style-type: square; } #wrapperlicious ul ul { margin-bottom: 0px; margin-top: 0px; } #footer { font-size: 0.8em; padding-top: 0.5em; text-align: center; } #more { display: inline; font-size: 0.8em; } #perldocdiv { background-color: #fff; border: 1px solid #c1c1c1; border-bottom-left-radius: 5px; border-bottom-right-radius: 5px; margin-left: auto; margin-right: auto; padding: 3em; padding-top: 1em; max-width: 960px; } #moduleversion { float: right } #wrapperlicious .leading-notice { font-style: italic; padding-left: 1em; margin-top: 1em; margin-bottom: 1em; } #wrapperlicious .permalink { display: none; left: -0.75em; position: absolute; padding-right: 0.25em; text-decoration: none; } #wrapperlicious h1:hover .permalink, #wrapperlicious h2:hover .permalink, #wrapperlicious h3:hover .permalink, #wrapperlicious h4:hover .permalink, #wrapperlicious dt:hover .permalink { display: block; } </style> <!-- Global site tag (gtag.js) - Google Analytics --> <script async src="https://www.googletagmanager.com/gtag/js?id=G-KVNWBNT5FB"></script> <script> window.dataLayer = window.dataLayer || []; function gtag(){dataLayer.push(arguments);} gtag('js', new Date()); gtag('config', 'G-KVNWBNT5FB'); gtag('config', 'UA-50555-3'); </script> </head> <body> <nav class="navbar navbar-expand-md navbar-dark bg-dark justify-content-between"> <button class="navbar-toggler" type="button" data-toggle="collapse" data-target="#navbarNav" aria-controls="navbarNav" aria-expanded="false" aria-label="Toggle navigation"> <span class="navbar-toggler-icon"></span> </button> <a class="navbar-brand" href="/"><img src="/images/perl_camel_30.png" width="30" height="30" class="d-inline-block align-top" alt="Perl Camel Logo"> Perldoc Browser</a> <div class="collapse navbar-collapse" id="navbarNav"> <ul class="navbar-nav mr-auto"> <li class="nav-item dropdown text-nowrap"> <a class="nav-link dropdown-toggle" href="#" id="dropdownlink-stable" role="button" data-toggle="dropdown" aria-haspopup="true" aria-expanded="false">5.12.4</a> <div class="dropdown-menu" aria-labelledby="dropdownlink-stable"> <a class="dropdown-item" href="/List::Util">Latest</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.40.1/List::Util">5.40.1</a> <a class="dropdown-item" href="/5.40.0/List::Util">5.40.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.38.3/List::Util">5.38.3</a> <a class="dropdown-item" href="/5.38.2/List::Util">5.38.2</a> <a class="dropdown-item" href="/5.38.1/List::Util">5.38.1</a> <a class="dropdown-item" href="/5.38.0/List::Util">5.38.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.36.3/List::Util">5.36.3</a> <a class="dropdown-item" href="/5.36.2/List::Util">5.36.2</a> <a class="dropdown-item" href="/5.36.1/List::Util">5.36.1</a> <a class="dropdown-item" href="/5.36.0/List::Util">5.36.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.34.3/List::Util">5.34.3</a> <a class="dropdown-item" href="/5.34.2/List::Util">5.34.2</a> <a class="dropdown-item" href="/5.34.1/List::Util">5.34.1</a> <a class="dropdown-item" href="/5.34.0/List::Util">5.34.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.32.1/List::Util">5.32.1</a> <a class="dropdown-item" href="/5.32.0/List::Util">5.32.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.30.3/List::Util">5.30.3</a> <a class="dropdown-item" href="/5.30.2/List::Util">5.30.2</a> <a class="dropdown-item" href="/5.30.1/List::Util">5.30.1</a> <a class="dropdown-item" href="/5.30.0/List::Util">5.30.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.28.3/List::Util">5.28.3</a> <a class="dropdown-item" href="/5.28.2/List::Util">5.28.2</a> <a class="dropdown-item" href="/5.28.1/List::Util">5.28.1</a> <a class="dropdown-item" href="/5.28.0/List::Util">5.28.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.26.3/List::Util">5.26.3</a> <a class="dropdown-item" href="/5.26.2/List::Util">5.26.2</a> <a class="dropdown-item" href="/5.26.1/List::Util">5.26.1</a> <a class="dropdown-item" href="/5.26.0/List::Util">5.26.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.24.4/List::Util">5.24.4</a> <a class="dropdown-item" href="/5.24.3/List::Util">5.24.3</a> <a class="dropdown-item" href="/5.24.2/List::Util">5.24.2</a> <a class="dropdown-item" href="/5.24.1/List::Util">5.24.1</a> <a class="dropdown-item" href="/5.24.0/List::Util">5.24.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.22.4/List::Util">5.22.4</a> <a class="dropdown-item" href="/5.22.3/List::Util">5.22.3</a> <a class="dropdown-item" href="/5.22.2/List::Util">5.22.2</a> <a class="dropdown-item" href="/5.22.1/List::Util">5.22.1</a> <a class="dropdown-item" href="/5.22.0/List::Util">5.22.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.20.3/List::Util">5.20.3</a> <a class="dropdown-item" href="/5.20.2/List::Util">5.20.2</a> <a class="dropdown-item" href="/5.20.1/List::Util">5.20.1</a> <a class="dropdown-item" href="/5.20.0/List::Util">5.20.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.18.4/List::Util">5.18.4</a> <a class="dropdown-item" href="/5.18.3/List::Util">5.18.3</a> <a class="dropdown-item" href="/5.18.2/List::Util">5.18.2</a> <a class="dropdown-item" href="/5.18.1/List::Util">5.18.1</a> <a class="dropdown-item" href="/5.18.0/List::Util">5.18.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.16.3/List::Util">5.16.3</a> <a class="dropdown-item" href="/5.16.2/List::Util">5.16.2</a> <a class="dropdown-item" href="/5.16.1/List::Util">5.16.1</a> <a class="dropdown-item" href="/5.16.0/List::Util">5.16.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.14.4/List::Util">5.14.4</a> <a class="dropdown-item" href="/5.14.3/List::Util">5.14.3</a> <a class="dropdown-item" href="/5.14.2/List::Util">5.14.2</a> <a class="dropdown-item" href="/5.14.1/List::Util">5.14.1</a> <a class="dropdown-item" href="/5.14.0/List::Util">5.14.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.12.5/List::Util">5.12.5</a> <a class="dropdown-item active" href="/5.12.4/List::Util">5.12.4</a> <a class="dropdown-item" href="/5.12.3/List::Util">5.12.3</a> <a class="dropdown-item" href="/5.12.2/List::Util">5.12.2</a> <a class="dropdown-item" href="/5.12.1/List::Util">5.12.1</a> <a class="dropdown-item" href="/5.12.0/List::Util">5.12.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.10.1/List::Util">5.10.1</a> <a class="dropdown-item" href="/5.10.0/List::Util">5.10.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.8.9/List::Util">5.8.9</a> <a class="dropdown-item" href="/5.8.8/List::Util">5.8.8</a> <a class="dropdown-item" href="/5.8.7/List::Util">5.8.7</a> <a class="dropdown-item" href="/5.8.6/List::Util">5.8.6</a> <a class="dropdown-item" href="/5.8.5/List::Util">5.8.5</a> <a class="dropdown-item" href="/5.8.4/List::Util">5.8.4</a> <a class="dropdown-item" href="/5.8.3/List::Util">5.8.3</a> <a class="dropdown-item" href="/5.8.2/List::Util">5.8.2</a> <a class="dropdown-item" href="/5.8.1/List::Util">5.8.1</a> <a class="dropdown-item" href="/5.8.0/List::Util">5.8.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.6.2/List::Util">5.6.2</a> <a class="dropdown-item" href="/5.6.1/List::Util">5.6.1</a> <a class="dropdown-item" href="/5.6.0/List::Util">5.6.0</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.005_04/List::Util">5.005_04</a> <a class="dropdown-item" href="/5.005_03/List::Util">5.005_03</a> <a class="dropdown-item" href="/5.005_02/List::Util">5.005_02</a> <a class="dropdown-item" href="/5.005_01/List::Util">5.005_01</a> <a class="dropdown-item" href="/5.005/List::Util">5.005</a> </div> </li> <li class="nav-item dropdown text-nowrap"> <a class="nav-link dropdown-toggle" href="#" id="dropdownlink-dev" role="button" data-toggle="dropdown" aria-haspopup="true" aria-expanded="false">Dev</a> <div class="dropdown-menu" aria-labelledby="dropdownlink-dev"> <a class="dropdown-item" href="/blead/List::Util">blead</a> <a class="dropdown-item" href="/5.41.10/List::Util">5.41.10</a> <a class="dropdown-item" href="/5.41.9/List::Util">5.41.9</a> <a class="dropdown-item" href="/5.41.8/List::Util">5.41.8</a> <a class="dropdown-item" href="/5.41.7/List::Util">5.41.7</a> <a class="dropdown-item" href="/5.41.6/List::Util">5.41.6</a> <a class="dropdown-item" href="/5.41.5/List::Util">5.41.5</a> <a class="dropdown-item" href="/5.41.4/List::Util">5.41.4</a> <a class="dropdown-item" href="/5.41.3/List::Util">5.41.3</a> <a class="dropdown-item" href="/5.41.2/List::Util">5.41.2</a> <a class="dropdown-item" href="/5.41.1/List::Util">5.41.1</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.40.1-RC1/List::Util">5.40.1-RC1</a> <a class="dropdown-item" href="/5.40.0-RC2/List::Util">5.40.0-RC2</a> <a class="dropdown-item" href="/5.40.0-RC1/List::Util">5.40.0-RC1</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.39.10/List::Util">5.39.10</a> <a class="dropdown-item" href="/5.39.9/List::Util">5.39.9</a> <a class="dropdown-item" href="/5.39.8/List::Util">5.39.8</a> <a class="dropdown-item" href="/5.39.7/List::Util">5.39.7</a> <a class="dropdown-item" href="/5.39.6/List::Util">5.39.6</a> <a class="dropdown-item" href="/5.39.5/List::Util">5.39.5</a> <a class="dropdown-item" href="/5.39.4/List::Util">5.39.4</a> <a class="dropdown-item" href="/5.39.3/List::Util">5.39.3</a> <a class="dropdown-item" href="/5.39.2/List::Util">5.39.2</a> <a class="dropdown-item" href="/5.39.1/List::Util">5.39.1</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.38.3-RC1/List::Util">5.38.3-RC1</a> </div> </li> <li class="nav-item dropdown text-nowrap"> <a class="nav-link dropdown-toggle" href="#" id="dropdownlink-nav" role="button" data-toggle="dropdown" aria-haspopup="true" aria-expanded="false">Documentation</a> <div class="dropdown-menu" aria-labelledby="dropdownlink-nav"> <a class="dropdown-item" href="/5.12.4/perl">Perl</a> <a class="dropdown-item" href="/5.12.4/perlintro">Intro</a> <a class="dropdown-item" href="/5.12.4/perl#Tutorials">Tutorials</a> <a class="dropdown-item" href="/5.12.4/perlfaq">FAQs</a> <a class="dropdown-item" href="/5.12.4/perl#Reference-Manual">Reference</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.12.4/perlop">Operators</a> <a class="dropdown-item" href="/5.12.4/functions">Functions</a> <a class="dropdown-item" href="/5.12.4/variables">Variables</a> <a class="dropdown-item" href="/5.12.4/modules">Modules</a> <a class="dropdown-item" href="/5.12.4/perlutil">Utilities</a> <div class="dropdown-divider"></div> <a class="dropdown-item" href="/5.12.4/perldelta">Release Notes</a> <a class="dropdown-item" href="/5.12.4/perlcommunity">Community</a> <a class="dropdown-item" href="/5.12.4/perlhist">History</a> </div> </li> </ul> <ul class="navbar-nav"> <script> function set_expand (expand) { var perldocdiv = document.getElementById('perldocdiv'); var width = window.getComputedStyle(perldocdiv).getPropertyValue('max-width'); var expanded = (width == '' || width == 'none') ? true : false; if (expand === null) { expand = !expanded; } if ((expand && !expanded) || (!expand && expanded)) { perldocdiv.style.setProperty('max-width', expand ? 'none' : '960px'); var button_classlist = document.getElementById('content-expand-button').classList; if (expand) { button_classlist.add('btn-light'); button_classlist.remove('btn-outline-light'); } else { button_classlist.add('btn-outline-light'); button_classlist.remove('btn-light'); } } return expand; } function toggle_expand () { var expand = set_expand(null); document.cookie = 'perldoc_expand=' + (expand ? 1 : 0) + '; path=/; expires=Tue, 19 Jan 2038 03:14:07 UTC'; } function read_expand () { return document.cookie.split(';').some(function (item) { return item.indexOf('perldoc_expand=1') >= 0 }); } if (document.readyState === 'loading') { document.addEventListener('DOMContentLoaded', function () { if (read_expand()) { set_expand(true); } }); } else if (read_expand()) { set_expand(true); } </script> <button id="content-expand-button" type="button" class="btn btn-outline-light d-none d-lg-inline-block mr-4" onclick="toggle_expand()">Expand</button> </ul> <form class="form-inline" method="get" action="/5.12.4/search"> <input class="form-control mr-3" type="search" name="q" placeholder="Search" aria-label="Search" value=""> </form> </div> </nav> <div id="wrapperlicious" class="container-fluid"> <div id="perldocdiv"> <div id="links"> <a href="/5.12.4/List::Util">List::Util</a> <div id="more"> (<a href="/5.12.4/List::Util.txt">source</a>, <a href="https://metacpan.org/pod/List::Util">CPAN</a>) </div> <div id="moduleversion">version 1.22</div> </div> <div class="leading-notice"> You are viewing the version of this documentation from Perl 5.12.4. <a href="/List::Util">View the latest version</a> </div> <h1><a id="toc">CONTENTS</a></h1> <ul> <li> <a class="text-decoration-none" href="#NAME">NAME</a> </li> <li> <a class="text-decoration-none" href="#SYNOPSIS">SYNOPSIS</a> </li> <li> <a class="text-decoration-none" href="#DESCRIPTION">DESCRIPTION</a> </li> <li> <a class="text-decoration-none" href="#KNOWN-BUGS">KNOWN BUGS</a> </li> <li> <a class="text-decoration-none" href="#SUGGESTED-ADDITIONS">SUGGESTED ADDITIONS</a> </li> <li> <a class="text-decoration-none" href="#SEE-ALSO">SEE ALSO</a> </li> <li> <a class="text-decoration-none" href="#COPYRIGHT">COPYRIGHT</a> </li> </ul> <h1 id="NAME"><a class="permalink" href="#NAME">#</a>NAME</h1> <p>List::Util - A selection of general-utility list subroutines</p> <h1 id="SYNOPSIS"><a class="permalink" href="#SYNOPSIS">#</a>SYNOPSIS</h1> <pre><code>use List::Util qw(first max maxstr min minstr reduce shuffle sum);</code></pre> <h1 id="DESCRIPTION"><a class="permalink" href="#DESCRIPTION">#</a>DESCRIPTION</h1> <p><code>List::Util</code> contains a selection of subroutines that people have expressed would be nice to have in the perl core, but the usage would not really be high enough to warrant the use of a keyword, and the size so small such that being individual extensions would be wasteful.</p> <p>By default <code>List::Util</code> does not export any subroutines. The subroutines defined are</p> <dl> <dt id="first-BLOCK-LIST"><a class="permalink" href="#first-BLOCK-LIST">#</a><a id="first"></a>first BLOCK LIST</dt> <dd> <p>Similar to <code>grep</code> in that it evaluates BLOCK setting <code>$_</code> to each element of LIST in turn. <code>first</code> returns the first element where the result from BLOCK is a true value. If BLOCK never returns true or LIST was empty then <code>undef</code> is returned.</p> <pre><code>$foo = first { defined($_) } @list # first defined value in @list $foo = first { $_ &gt; $value } @list # first value in @list which # is greater than $value</code></pre> <p>This function could be implemented using <code>reduce</code> like this</p> <pre><code>$foo = reduce { defined($a) ? $a : wanted($b) ? $b : undef } undef, @list</code></pre> <p>for example wanted() could be defined() which would return the first defined value in @list</p> </dd> <dt id="max-LIST"><a class="permalink" href="#max-LIST">#</a><a id="max"></a>max LIST</dt> <dd> <p>Returns the entry in the list with the highest numerical value. If the list is empty then <code>undef</code> is returned.</p> <pre><code>$foo = max 1..10 # 10 $foo = max 3,9,12 # 12 $foo = max @bar, @baz # whatever</code></pre> <p>This function could be implemented using <code>reduce</code> like this</p> <pre><code>$foo = reduce { $a &gt; $b ? $a : $b } 1..10</code></pre> </dd> <dt id="maxstr-LIST"><a class="permalink" href="#maxstr-LIST">#</a><a id="maxstr"></a>maxstr LIST</dt> <dd> <p>Similar to <code>max</code>, but treats all the entries in the list as strings and returns the highest string as defined by the <code>gt</code> operator. If the list is empty then <code>undef</code> is returned.</p> <pre><code>$foo = maxstr &#39;A&#39;..&#39;Z&#39; # &#39;Z&#39; $foo = maxstr &quot;hello&quot;,&quot;world&quot; # &quot;world&quot; $foo = maxstr @bar, @baz # whatever</code></pre> <p>This function could be implemented using <code>reduce</code> like this</p> <pre><code>$foo = reduce { $a gt $b ? $a : $b } &#39;A&#39;..&#39;Z&#39;</code></pre> </dd> <dt id="min-LIST"><a class="permalink" href="#min-LIST">#</a><a id="min"></a>min LIST</dt> <dd> <p>Similar to <code>max</code> but returns the entry in the list with the lowest numerical value. If the list is empty then <code>undef</code> is returned.</p> <pre><code>$foo = min 1..10 # 1 $foo = min 3,9,12 # 3 $foo = min @bar, @baz # whatever</code></pre> <p>This function could be implemented using <code>reduce</code> like this</p> <pre><code>$foo = reduce { $a &lt; $b ? $a : $b } 1..10</code></pre> </dd> <dt id="minstr-LIST"><a class="permalink" href="#minstr-LIST">#</a><a id="minstr"></a>minstr LIST</dt> <dd> <p>Similar to <code>min</code>, but treats all the entries in the list as strings and returns the lowest string as defined by the <code>lt</code> operator. If the list is empty then <code>undef</code> is returned.</p> <pre><code>$foo = minstr &#39;A&#39;..&#39;Z&#39; # &#39;A&#39; $foo = minstr &quot;hello&quot;,&quot;world&quot; # &quot;hello&quot; $foo = minstr @bar, @baz # whatever</code></pre> <p>This function could be implemented using <code>reduce</code> like this</p> <pre><code>$foo = reduce { $a lt $b ? $a : $b } &#39;A&#39;..&#39;Z&#39;</code></pre> </dd> <dt id="reduce-BLOCK-LIST"><a class="permalink" href="#reduce-BLOCK-LIST">#</a><a id="reduce"></a>reduce BLOCK LIST</dt> <dd> <p>Reduces LIST by calling BLOCK, in a scalar context, multiple times, setting <code>$a</code> and <code>$b</code> each time. The first call will be with <code>$a</code> and <code>$b</code> set to the first two elements of the list, subsequent calls will be done by setting <code>$a</code> to the result of the previous call and <code>$b</code> to the next element in the list.</p> <p>Returns the result of the last call to BLOCK. If LIST is empty then <code>undef</code> is returned. If LIST only contains one element then that element is returned and BLOCK is not executed.</p> <pre><code>$foo = reduce { $a &lt; $b ? $a : $b } 1..10 # min $foo = reduce { $a lt $b ? $a : $b } &#39;aa&#39;..&#39;zz&#39; # minstr $foo = reduce { $a + $b } 1 .. 10 # sum $foo = reduce { $a . $b } @bar # concat</code></pre> <p>If your algorithm requires that <code>reduce</code> produce an identity value, then make sure that you always pass that identity value as the first argument to prevent <code>undef</code> being returned</p> <pre><code>$foo = reduce { $a + $b } 0, @values; # sum with 0 identity value</code></pre> </dd> <dt id="shuffle-LIST"><a class="permalink" href="#shuffle-LIST">#</a><a id="shuffle"></a>shuffle LIST</dt> <dd> <p>Returns the elements of LIST in a random order</p> <pre><code>@cards = shuffle 0..51 # 0..51 in a random order</code></pre> </dd> <dt id="sum-LIST"><a class="permalink" href="#sum-LIST">#</a><a id="sum"></a>sum LIST</dt> <dd> <p>Returns the sum of all the elements in LIST. If LIST is empty then <code>undef</code> is returned.</p> <pre><code>$foo = sum 1..10 # 55 $foo = sum 3,9,12 # 24 $foo = sum @bar, @baz # whatever</code></pre> <p>This function could be implemented using <code>reduce</code> like this</p> <pre><code>$foo = reduce { $a + $b } 1..10</code></pre> <p>If your algorithm requires that <code>sum</code> produce an identity of 0, then make sure that you always pass <code>0</code> as the first argument to prevent <code>undef</code> being returned</p> <pre><code>$foo = sum 0, @values;</code></pre> </dd> </dl> <h1 id="KNOWN-BUGS"><a class="permalink" href="#KNOWN-BUGS">#</a><a id="KNOWN"></a>KNOWN BUGS</h1> <p>With perl versions prior to 5.005 there are some cases where reduce will return an incorrect result. This will show up as test 7 of reduce.t failing.</p> <h1 id="SUGGESTED-ADDITIONS"><a class="permalink" href="#SUGGESTED-ADDITIONS">#</a><a id="SUGGESTED"></a>SUGGESTED ADDITIONS</h1> <p>The following are additions that have been requested, but I have been reluctant to add due to them being very simple to implement in perl</p> <pre><code># One argument is true sub any { $_ &amp;&amp; return 1 for @_; 0 } # All arguments are true sub all { $_ || return 0 for @_; 1 } # All arguments are false sub none { $_ &amp;&amp; return 0 for @_; 1 } # One argument is false sub notall { $_ || return 1 for @_; 0 } # How many elements are true sub true { scalar grep { $_ } @_ } # How many elements are false sub false { scalar grep { !$_ } @_ }</code></pre> <h1 id="SEE-ALSO"><a class="permalink" href="#SEE-ALSO">#</a><a id="SEE"></a>SEE ALSO</h1> <p><a href="/5.12.4/Scalar::Util">Scalar::Util</a>, <a href="/5.12.4/List::MoreUtils">List::MoreUtils</a></p> <h1 id="COPYRIGHT"><a class="permalink" href="#COPYRIGHT">#</a>COPYRIGHT</h1> <p>Copyright (c) 1997-2007 Graham Barr &lt;gbarr@pobox.com&gt;. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.</p> </div> <div id="footer"> <p>Perldoc Browser is maintained by Dan Book (<a href="https://metacpan.org/author/DBOOK">DBOOK</a>). Please contact him via the <a href="https://github.com/Grinnz/perldoc-browser/issues">GitHub issue tracker</a> or <a href="mailto:dbook@cpan.org">email</a> regarding any issues with the site itself, search, or rendering of documentation.</p> <p>The Perl documentation is maintained by the Perl 5 Porters in the development of Perl. Please contact them via the <a href="https://github.com/Perl/perl5/issues">Perl issue tracker</a>, the <a href="https://lists.perl.org/list/perl5-porters.html">mailing list</a>, or <a href="https://kiwiirc.com/client/irc.perl.org/p5p">IRC</a> to report any issues with the contents or format of the documentation.</p> </div> </div> <script src="https://cdnjs.cloudflare.com/ajax/libs/jquery/3.5.1/jquery.slim.min.js" integrity="sha512-/DXTXr6nQodMUiq+IUJYCt2PPOUjrHJ9wFrqpJ3XkgPNOZVfMok7cRw6CSxyCQxXn6ozlESsSh1/sMCTF1rL/g==" crossorigin="anonymous"></script> <script src="https://cdnjs.cloudflare.com/ajax/libs/popper.js/1.16.1/umd/popper.min.js" integrity="sha512-ubuT8Z88WxezgSqf3RLuNi5lmjstiJcyezx34yIU2gAHonIi27Na7atqzUZCOoY4CExaoFumzOsFQ2Ch+I/HCw==" crossorigin="anonymous"></script> <script src="https://stackpath.bootstrapcdn.com/bootstrap/4.5.2/js/bootstrap.min.js" integrity="sha384-B4gt1jrGC7Jh4AgTPSdUtOBvfO8shuf57BaghqFfPlYxofvL8/KUEfYiJOMMV+rV" crossorigin="anonymous"></script> <script src="/js/highlight.pack.js"></script> <script>hljs.highlightAll();</script> </body> </html>

Pages: 1 2 3 4 5 6 7 8 9 10