Math-Permute-Array
view release on metacpan or search on metacpan
doc/coverage/blib-lib-Math-Permute-Array-pm.html view on Meta::CPAN
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<!--
This file was generated by Devel::Cover Version 0.94
Devel::Cover is copyright 2001-2012, Paul Johnson (paul@pjcj.net)
Devel::Cover is free. It is licensed under the same terms as Perl itself.
The latest version of Devel::Cover should be available from my homepage:
http://www.pjcj.net
-->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8"></meta>
<meta http-equiv="Content-Language" content="en-us"></meta>
<link rel="stylesheet" type="text/css" href="cover.css"></link>
<link rel="stylesheet" type="text/css" href="cover.css"></link>
<title>File Coverage: blib/lib/Math/Permute/Array.pm</title>
</head>
<body>
<h1>File Coverage</h1>
<table>
<tr><td class="h" align="right">File:</td><td align="left">blib/lib/Math/Permute/Array.pm</td></tr>
<tr><td class="h" align="right">Coverage:</td><td align="left" class="c3">100.0%</td></tr>
</table>
<div><br/></div>
<table>
<tr><th>line</th><th>stmt</th><th>bran</th><th>cond</th><th>sub</th><th>pod</th><th>time</th><th>code</th></tr>
<tr><td class="h">1</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">package Math::Permute::Array;</td></tr>
<tr><td class="h">2</td><td colspan="7"></td></tr><tr><td class="h">3</td><td><div class="c3">6</div><div class="c3">6</div><div class="c3">6</div></td><td></td><td></td><td><div class="c3"><a href="blib-lib-Math-Permute-Array-pm--subroutine.html#L3"...
<tr><td class="h">4</td><td><div class="c3">6</div><div class="c3">6</div><div class="c3">6</div></td><td></td><td></td><td><div class="c3"><a href="blib-lib-Math-Permute-Array-pm--subroutine.html#L4">6</a></div></td><td></td><td><div>21</div><div>13...
<tr><td class="h">5</td><td colspan="7"></td></tr><tr><td class="h">6</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">require Exporter;</td></tr>
<tr><td class="h">7</td><td colspan="7"></td></tr><tr><td class="h">8</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">our @ISA = qw(Exporter);</td></tr>
<tr><td class="h">9</td><td colspan="7"></td></tr><tr><td class="h">10</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"># Items to export into callers namespace by default. Note: do not export</td></tr>
<tr><td class="h">11</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"># names by default without a very good reason. Use EXPORT_OK instead.</td></tr>
<tr><td class="h">12</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"># Do not simply export all your public functions/methods/constants.</td></tr>
<tr><td class="h">13</td><td colspan="7"></td></tr><tr><td class="h">14</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"># This allows declaration use Math::Permute::Array ':all';</td></tr>
<tr><td class="h">15</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"># If you do not need this, moving things directly into @EXPORT or @EXPORT_OK</td></tr>
<tr><td class="h">16</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"># will save memory.</td></tr>
<tr><td class="h">17</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">our %EXPORT_TAGS = ( 'all' => [ qw()],</td></tr>
<tr><td class="h">18</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> 'Permute' => [ qw(Pe...
<tr><td class="h">19</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> 'Apply_on_perms' => ...
<tr><td class="h">20</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> );</td></tr>
<tr><td class="h">21</td><td colspan="7"></td></tr><tr><td class="h">22</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );</td></tr>
<tr><td class="h">23</td><td colspan="7"></td></tr><tr><td class="h">24</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">our @EXPORT = qw(</td></tr>
<tr><td class="h">25</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> Permute</td></tr>
<tr><td class="h">26</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> Apply_on_perms</td></tr>
<tr><td class="h">27</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">);</td></tr>
<tr><td class="h">28</td><td colspan="7"></td></tr><tr><td class="h">29</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">our $VERSION = '0.0421';</td></tr>
<tr><td class="h">30</td><td colspan="7"></td></tr><tr><td class="h">31</td><td colspan="7"></td></tr><tr><td class="h">32</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">sub new</td></tr>
<tr><td class="h">33</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">{</td></tr>
<tr><td class="h">34</td><td><div class="c3">4</div></td><td></td><td></td><td><div class="c3"><a href="blib-lib-Math-Permute-Array-pm--subroutine.html#L34">4</a></div></td><td><div class="c3">1</div></td><td><div>444926</div></td><td class="s"> ...
<tr><td class="h">35</td><td><div class="c3">4</div></td><td></td><td></td><td></td><td></td><td><div>14</div></td><td class="s"> my $self = {};</td></tr>
<tr><td class="h">36</td><td><div class="c3">4</div></td><td></td><td></td><td></td><td></td><td><div>10</div></td><td class="s"> $self->{array} = shift;</td></tr>
<tr><td class="h">37</td><td><div class="c3">4</div></td><td></td><td></td><td></td><td></td><td><div>7</div></td><td class="s"> $self->{iterator} = 0;</td></tr>
<tr><td class="h">38</td><td><div class="c3">4</div></td><td></td><td></td><td></td><td></td><td><div>6</div></td><td class="s"> $self->{cardinal} = undef;</td></tr>
<tr><td class="h">39</td><td><div class="c3">4</div></td><td></td><td></td><td></td><td></td><td><div>33</div></td><td class="s"> bless($self, $class);</td></tr>
<tr><td class="h">40</td><td><div class="c3">4</div></td><td><div class="c3" title="T/F"><a href="blib-lib-Math-Permute-Array-pm--branch.html#L40">100</a></div></td><td></td><td></td><td></td><td><div>24</div></td><td class="s"> return und...
<tr><td class="h">41</td><td><div class="c3">3</div></td><td></td><td></td><td></td><td></td><td><div>22</div></td><td class="s"> return $self;</td></tr>
<tr><td class="h">42</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
<tr><td class="h">43</td><td colspan="7"></td></tr><tr><td class="h">44</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">#nice implementation from the cookbook</td></tr>
<tr><td class="h">45</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">#but mine seems lightly more efficient</td></tr>
<tr><td class="h">46</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">#sub N2Permute</td></tr>
( run in 0.845 second using v1.01-cache-2.11-cpan-119454b85a5 )