length results from the CPAN

mg_copy|||
mg_dup|||
mg_find|||
mg_free|||
mg_get|||
mg_length||5.005000|
mg_localize|||
mg_magical|||
mg_set|||
mg_size||5.005000|
mini_mktime||5.007002|

reg_named_buff_scalar||5.009005|
reg_named_buff|||
reg_namedseq|||
reg_node|||
reg_numbered_buff_fetch|||
reg_numbered_buff_length|||
reg_numbered_buff_store|||
reg_qr_package|||
reg_recode|||
reg_scan_name|||
reg_skipcomment|||

usage|||
utf16_to_utf8_reversed||5.006001|
utf16_to_utf8||5.006001|
utf8_distance||5.006000|
utf8_hop||5.006000|
utf8_length||5.007001|
utf8_mg_pos_cache_update|||
utf8_to_bytes||5.006001|
utf8_to_uvchr||5.007001|
utf8_to_uvuni||5.007001|
utf8n_to_uvchr|||


if (exists $opt{'list-unsupported'}) {
  my $f;
  for $f (sort { lc $a cmp lc $b } keys %API) {
    next unless $API{$f}{todo};
    print "$f ", '.'x(40-length($f)), " ", format_version($API{$f}{todo}), "\n";
  }
  exit 0;
}

# Scan for possible replacement candidates

#ifndef ERRSV
#  define ERRSV                          get_sv("@",FALSE)
#endif

/* Hint: gv_stashpvn
 * This function's backport doesn't support the length parameter, but
 * rather ignores it. Portability can only be ensured if the length
 * parameter is used for speed reasons, but the length can always be
 * correctly computed from the string argument.
 */
#ifndef gv_stashpvn
#  define gv_stashpvn(str,len,create)    gv_stashpv(str,create)
#endif

#if defined(NEED_my_strlcat) || defined(NEED_my_strlcat_GLOBAL)

Size_t
DPPP_(my_my_strlcat)(char *dst, const char *src, Size_t size)
{
    Size_t used, length, copy;

    used = strlen(dst);
    length = strlen(src);
    if (size > 0 && used < size - 1) {
        copy = (length >= size - used) ? size - used - 1 : length;
        memcpy(dst + used, src, copy);
        dst[used + copy] = '\0';
    }
    return used + length;
}
#endif
#endif

#if !defined(my_strlcpy)

#if defined(NEED_my_strlcpy) || defined(NEED_my_strlcpy_GLOBAL)

Size_t
DPPP_(my_my_strlcpy)(char *dst, const char *src, Size_t size)
{
    Size_t length, copy;

    length = strlen(src);
    if (size > 0) {
        copy = (length >= size) ? size - 1 : length;
        memcpy(dst, src, copy);
        dst[copy] = '\0';
    }
    return length;
}

#endif
#endif
#ifndef PERL_PV_ESCAPE_QUOTE

view all matches for this distribution

Algorithm-Step

1 match

lib/Algorithm/Step.pm view on Meta::CPAN

	}
}

sub pad_dots {
	my ($s, $len) = @_;
	return $s if $len <= (length $s);
	return $s . "." x ($len - length $s);
}

sub end_algorithm {
	pop @algstack;
	$curralg = pop @algstack;

view all matches for this distribution

Algorithm-StringHash-FromCSharp35-XS

3 results

lib/Algorithm/StringHash/FromCSharp35/XS.pm view on Meta::CPAN

      no warnings 'uninitialized';
      my $str = shift;
      my @str = split //, $str;
      my $num = 0x15051505;
      my $num2 = $num;
      my $len=length($str);
      my $i = 0;
      my $pos = 0;
      my $field_max = 1<<32;
      for($i=$len;$i>0;$i-=4)
      {

view all matches for this distribution

Algorithm-TicketClusterer

3 results

examples/ticket_preprocessor_and_doc_modeler.pl view on Meta::CPAN

                     stop_words_file           => $stop_words_file,
                     misspelled_words_file     => $misspelled_words_file,
                     add_synsets_to_tickets    => 1,
                     want_synset_caching       => 1,
                     max_num_syn_words         => 3,
                     min_word_length           => 4,
                     want_stemming             => 1,
                );

## Extract information from Excel spreadsheets:
$clusterer->get_tickets_from_excel();

view all matches for this distribution

Algorithm-TravelingSalesman-BitonicTour

6 results

example/cb.pl view on Meta::CPAN

$b->add_point(5,4);
$b->add_point(6,1);
$b->add_point(7,5);
$b->add_point(8,2);

my ($length, @tour) = $b->solve;

print "length of optimal bitonic tour: $length\n";
print "points in optimal bitonic tour:\n";
print "  (@$_)\n" for @tour;

view all matches for this distribution

Algorithm-TrunkClassifier

3 results

lib/Algorithm/TrunkClassifier/DataWrapper.pm view on Meta::CPAN

	}
	if(!$classes{$className} || !$membership{$className}){
		die "Error: Missing meta data for classification variable '$className' in $datasetType\n";
	}
	if(scalar(@{$membership{$className}}) != $totNumSamples){
		die "Error: CLASSMEM vector for '$className' and sample vector have different lengths in $datasetType\n";
	}
	foreach my $class (@{$membership{$className}}){
		if($class ne $NULL_CLASS && !$classes{$className}{$class}){
			die "Error: Invalid class label in '$className' CLASSMEM vector in $datasetType\n";
		}

view all matches for this distribution

Algorithm-VSM

55 results

examples/calculate_precision_and_recall_for_LSA.pl view on Meta::CPAN

                   file_types          => ['.txt', '.java'],
                   lsa_svd_threshold   => 0.05,     # Used for rejecting singular
                                                    # values that are smaller than
                                                    # this threshold fraction of
                                                    # the largest singular value.
                   min_word_length     => 4,
                   query_file          => $query_file,
                   relevancy_file      => $relevancy_file,   # Relevancy judgments
                                                             # are deposited in 
                                                             # this file.
                   relevancy_threshold => 5,    # Used when estimating relevancies

view all matches for this distribution

Algorithm-WordLevelStatistics

1 match

all, and which we employ as a standard measure. If, now, A and B are
two points on a rigid body, we can construct the line joining them
according to the rules of geometry ; then, starting from A, we can
mark off the distance S time after time until we reach B. The number
of these operations required is the numerical measure of the distance
AB. This is the basis of all measurement of length. *

Every description of the scene of an event or of the position of an
object in space is based on the specification of the point on a rigid
body (body of reference) with which that event or object coincides.
This applies not only to scientific description, but also to everyday

we can free ourselves from both of these limitations without altering
the nature of our specification of position. If, for instance, a cloud
is hovering over Times Square, then we can determine its position
relative to the surface of the earth by erecting a pole
perpendicularly on the Square, so that it reaches the cloud. The
length of the pole measured with the standard measuring-rod, combined
with the specification of the position of the foot of the pole,
supplies us with a complete place specification. On the basis of this
illustration, we are able to see the manner in which a refinement of
the conception of position has been developed.

(a) We imagine the rigid body, to which the place specification is
referred, supplemented in such a manner that the object whose position
we require is reached by. the completed rigid body.

(b) In locating the position of the object, we make use of a number
(here the length of the pole measured with the measuring-rod) instead
of designated points of reference.

(c) We speak of the height of the cloud even when the pole which
reaches the cloud has not been erected. By means of optical
observations of the cloud from different positions on the ground, and
taking into account the properties of the propagation of light, we
determine the length of the pole we should have required in order to
reach the cloud.

From this consideration we see that it will be advantageous if, in the
description of position, it should be possible by means of numerical
measures to make ourselves independent of the existence of marked

Cartesian system of co-ordinates.

This consists of three plane surfaces perpendicular to each other and
rigidly attached to a rigid body. Referred to a system of
co-ordinates, the scene of any event will be determined (for the main
part) by the specification of the lengths of the three perpendiculars
or co-ordinates (x, y, z) which can be dropped from the scene of the
event to those three plane surfaces. The lengths of these three
perpendiculars can be determined by a series of manipulations with
rigid measuring-rods performed according to the rules and methods laid
down by Euclidean geometry.

In practice, the rigid surfaces which constitute the system of

EMPLOYED IN CLASSICAL MECHANICS


Let us suppose our old friend the railway carriage to be travelling
along the rails with a constant velocity v, and that a man traverses
the length of the carriage in the direction of travel with a velocity
w. How quickly or, in other words, with what velocity W does the man
advance relative to the embankment during the process ? The only
possible answer seems to result from the following consideration: If
the man were to stand still for a second, he would advance relative to
the embankment through a distance v equal numerically to the velocity

regard the matter as quite settled, because I feel constrained to
raise the following objection:

"Your definition would certainly be right, if only I knew that the
light by means of which the observer at M perceives the lightning
flashes travels along the length A arrow M with the same velocity as
along the length B arrow M. But an examination of this supposition
would only be possible if we already had at our disposal the means of
measuring time. It would thus appear as though we were moving here in
a logical circle."

After further consideration you cast a somewhat disdainful glance at

answer must be in the negative.

When we say that the lightning strokes A and B are simultaneous with
respect to be embankment, we mean: the rays of light emitted at the
places A and B, where the lightning occurs, meet each other at the
mid-point M of the length A arrow B of the embankment. But the events
A and B also correspond to positions A and B on the train. Let M1 be
the mid-point of the distance A arrow B on the travelling train. Just
when the flashes (as judged from the embankment) of lightning occur,
this point M1 naturally coincides with the point M but it moves
towards the right in the diagram with the velocity v of the train. If

by applying the definition of time given in Section 8. The distance
between these points A and B is then measured by repeated application
of thee measuring-rod along the embankment.

A priori it is by no means certain that this last measurement will
supply us with the same result as the first. Thus the length of the
train as measured from the embankment may be different from that
obtained by measuring in the train itself. This circumstance leads us
to a second objection which must be raised against the apparently
obvious consideration of Section 6. Namely, if the man in the
carriage covers the distance w in a unit of time -- measured from the


This system of equations is known as the " Lorentz transformation." *

If in place of the law of transmission of light we had taken as our
basis the tacit assumptions of the older mechanics as to the absolute
character of times and lengths, then instead of the above we should
have obtained the following equations:

                             x1 = x - vt
                                y1 = y
                                z1 = z

THE BEHAVIOUR OF MEASURING-RODS AND CLOCKS IN MOTION


Place a metre-rod in the x1-axis of K1 in such a manner that one end
(the beginning) coincides with the point x1=0 whilst the other end
(the end of the rod) coincides with the point x1=I. What is the length
of the metre-rod relatively to the system K? In order to learn this,
we need only ask where the beginning of the rod and the end of the rod
lie with respect to K at a particular time t of the system K. By means
of the first equation of the Lorentz transformation the values of
these two points at the time t = 0 can be shown to be



the distance between the points being eq. 06 .

But the metre-rod is moving with the velocity v relative to K. It
therefore follows that the length of a rigid metre-rod moving in the
direction of its length with a velocity v is eq. 06 of a metre.

The rigid rod is thus shorter when in motion than when at rest, and
the more quickly it is moving, the shorter is the rod. For the
velocity v=c we should have eq. 06a ,

Of course this feature of the velocity c as a limiting velocity also
clearly follows from the equations of the Lorentz transformation, for
these became meaningless if we choose values of v greater than c.

If, on the contrary, we had considered a metre-rod at rest in the
x-axis with respect to K, then we should have found that the length of
the rod as judged from K1 would have been eq. 06 ;

this is quite in accordance with the principle of relativity which
forms the basis of our considerations.

the electron (rigid connection in the sense of classical mechanics),
we arrive at a law of motion of the electron which does not agree with
experience. Guided by purely formal points of view, H. A. Lorentz was
the first to introduce the hypothesis that the form of the electron
experiences a contraction in the direction of motion in consequence of
that motion. the contracted length being proportional to the
expression

                        eq. 05: file eq05.gif

This, hypothesis, which is not justifiable by any electrodynamical

another reference-body which is not being pulled with a rope.

But how does the man in the chest regard the Process ? The
acceleration of the chest will be transmitted to him by the reaction
of the floor of the chest. He must therefore take up this pressure by
means of his legs if he does not wish to be laid out full length on
the floor. He is then standing in the chest in exactly the same way as
anyone stands in a room of a home on our earth. If he releases a body
which he previously had in his land, the accelertion of the chest will
no longer be transmitted to this body, and for this reason the body
will approach the floor of the chest with an accelerated relative


Moreover, at this stage the definition of the space co-ordinates also
presents insurmountable difficulties. If the observer applies his
standard measuring-rod (a rod which is short as compared with the
radius of the disc) tangentially to the edge of the disc, then, as
judged from the Galileian system, the length of this rod will be less
than I, since, according to Section 12, moving bodies suffer a
shortening in the direction of the motion. On the other hand, the
measaring-rod will not experience a shortening in length, as judged
from K, if it is applied to the disc in the direction of the radius.
If, then, the observer first measures the circumference of the disc
with his measuring-rod and then the diameter of the disc, on dividing
the one by the other, he will not obtain as quotient the familiar
number p = 3.14 . . ., but a larger number,[4]** whereas of course,
for a disc which is at rest with respect to K, this operation would
yield p exactly. This proves that the propositions of Euclidean
geometry cannot hold exactly on the rotating disc, nor in general in a
gravitational field, at least if we attribute the length I to the rod
in all positions and in every orientation. Hence the idea of a
straight line also loses its meaning. We are therefore not in a
position to define exactly the co-ordinates x, y, z relative to the
disc by means of the method used in discussing the special theory, and
as long as the co- ordinates and times of events have not been

will appreciate with sufficient clearness what I mean here by "
neighbouring " and by " jumps " (if he is not too pedantic). We
express this property of the surface by describing the latter as a
continuum.

Let us now imagine that a large number of little rods of equal length
have been made, their lengths being small compared with the dimensions
of the marble slab. When I say they are of equal length, I mean that
one can be laid on any other without the ends overlapping. We next lay
four of these little rods on the marble slab so that they constitute a
quadrilateral figure (a square), the diagonals of which are equally
long. To ensure the equality of the diagonals, we make use of a little
testing-rod. To this square we add similar ones, each of which has one

coincidence at every position on the table. But our construction of
squares must necessarily come into disorder during the heating,
because the little rods on the central region of the table expand,
whereas those on the outer part do not.

With reference to our little rods -- defined as unit lengths -- the
marble slab is no longer a Euclidean continuum, and we are also no
longer in the position of defining Cartesian co-ordinates directly
with their aid, since the above construction can no longer be carried
out. But since there are other things which are not influenced in a
similar manner to the little rods (or perhaps not at all) by the
temperature of the table, it is possible quite naturally to maintain
the point of view that the marble slab is a " Euclidean continuum."
This can be done in a satisfactory manner by making a more subtle
stipulation about the measurement or the comparison of lengths.

But if rods of every kind (i.e. of every material) were to behave in
the same way as regards the influence of temperature when they are on
the variably heated marble slab, and if we had no other means of
detecting the effect of temperature than the geometrical behaviour of

extends exclusively over the surface of the sphere. Are these beings
able to regard the geometry of their universe as being plane geometry
and their rods withal as the realisation of " distance " ? They cannot
do this. For if they attempt to realise a straight line, they will
obtain a curve, which we " three-dimensional beings " designate as a
great circle, i.e. a self-contained line of definite finite length,
which can be measured up by means of a measuring-rod. Similarly, this
universe has a finite area that can be compared with the area, of a
square constructed with rods. The great charm resulting from this
consideration lies in the recognition of the fact that the universe of
these beings is finite and yet has no limits.

But the spherical-surface beings do not need to go on a world-tour in
order to perceive that they are not living in a Euclidean universe.
They can convince themselves of this on every part of their " world,"
provided they do not use too small a piece of it. Starting from a
point, they draw " straight lines " (arcs of circles as judged in
three dimensional space) of equal length in all directions. They will
call the line joining the free ends of these lines a " circle." For a
plane surface, the ratio of the circumference of a circle to its
diameter, both lengths being measured with the same rod, is, according
to Euclidean geometry of the plane, equal to a constant value p, which
is independent of the diameter of the circle. On their spherical
surface our flat beings would find for this ratio the value

                        eq. 27: file eq27.gif

movement of " rigid " bodies. In this sense we can imagine a spherical
space.

Suppose we draw lines or stretch strings in all directions from a
point, and mark off from each of these the distance r with a
measuring-rod. All the free end-points of these lengths lie on a
spherical surface. We can specially measure up the area (F) of this
surface by means of a square made up of measuring-rods. If the
universe is Euclidean, then F = 4pR2 ; if it is spherical, then F is
always less than 4pR2. With increasing values of r, F increases from
zero up to a maximum value which is determined by the " world-radius,"

(directed towards the negative x-axis) of a point of K with respect to
K'. In short, we can designate v as the relative velocity of the two
systems.

Furthermore, the principle of relativity teaches us that, as judged
from K, the length of a unit measuring-rod which is at rest with
reference to K1 must be exactly the same as the length, as judged from
K', of a unit measuring-rod which is at rest relative to K. In order
to see how the points of the x-axis appear as viewed from K, we only
require to take a " snapshot " of K1 from K; this means that we have
to insert a particular value of t (time of K), e.g. t = 0. For this
value of t we then obtain from the first of the equations (5)

at the surface of the earth, the amount of this displacement being

                        eq. 48: file eq48.gif

For the sun, the displacement towards the red predicted by theory
amounts to about two millionths of the wave-length. A trustworthy
calculation is not possible in the case of the stars, because in
general neither the mass M nor the radius r are known.

It is an open question whether or not this effect exists, and at the
present time (1920) astronomers are working with great zeal towards

view all matches for this distribution

Algorithm-X-DLX

6 results

examples/sudoku/Sudoku.pm view on Meta::CPAN

    if (ref($arg) eq 'SudokuType') {
      $self->{type_} = $arg;
    } elsif (ref($arg) eq 'ARRAY') {
      $self->{values_} = [@$arg];
    } elsif (defined $arg && !ref($arg)) {
      croak "Got empty string" unless length $arg;
      $string = $arg;
    } else {
      die "Unknown blessed parameter.\n";
    }
  }

view all matches for this distribution

Alice

7 results

inc/Module/Install.pm view on Meta::CPAN

		$s =~ s/(\.)(\d{1,3})/sprintf("$1%03d",$2)/eg;
	}
	$s =~ s/^(\d+)\.?//;
	my $l = $1 || 0;
	my @v = map {
		$_ . '0' x (3 - length $_)
	} $s =~ /(\d{1,3})\D?/g;
	$l = $l . '.' . join '', @v if @v;
	return $l + 0;
}

view all matches for this distribution

Alien-7zip

1 match

t/00-report-prereqs.t view on Meta::CPAN

        }

        if ( @reports ) {
            push @full_reports, "=== $title ===\n\n";

            my $ml = _max( map { length $_->[0] } @reports );
            my $wl = _max( map { length $_->[1] } @reports );
            my $hl = _max( map { length $_->[2] } @reports );

            if ($type eq 'modules') {
                splice @reports, 1, 0, ["-" x $ml, "", "-" x $hl];
                push @full_reports, map { sprintf("    %*s %*s\n", -$ml, $_->[0], $hl, $_->[2]) } @reports;
            }

view all matches for this distribution

Alien-ActiveMQ

3 results

inc/Module/AutoInstall.pm view on Meta::CPAN


    my $cwd = Cwd::cwd();

    $Config = [];

    my $maxlen = length(
        (
            sort   { length($b) <=> length($a) }
              grep { /^[^\-]/ }
              map  {
                ref($_)
                  ? ( ( ref($_) eq 'HASH' ) ? keys(%$_) : @{$_} )
                  : ''

view all matches for this distribution

Alien-Alien

1 match

}

pass 'okay';

my $max = 1;
$max = $_ > $max ? $_ : $max for map { length $_ } @modules;
our $format = "%-${max}s %s"; 

spacer;

my @keys = sort grep /(MOJO|PERL|\A(LC|HARNESS)_|\A(SHELL|LANG)\Z)/i, keys %ENV;

view all matches for this distribution

Alien-Autotools

1 match

LICENSE view on Meta::CPAN

  The object code form of an Application may incorporate material from
a header file that is part of the Library.  You may convey such object
code under terms of your choice, provided that, if the incorporated
material is not limited to numerical parameters, data structure
layouts and accessors, or small macros, inline functions and templates
(ten or fewer lines in length), you do both of the following:

   a) Give prominent notice with each copy of the object code that the
   Library is used in it and that the Library and its use are
   covered by this License.

view all matches for this distribution

Alien-BCM2835

3 results

t/00-all_prereqs.t view on Meta::CPAN

    print STDERR "# Listing %INC\n";

    my @packages = grep { s/\.pm\Z// and do { s![\\/]!::!g; 1 } } sort keys %INC;

    my $len = 0;
    for (@packages) { $len = length if length > $len }
    $len = 68 if $len > 68;

    for my $package (@packages) {
      printf STDERR "# %${len}s %s\n", $package, get_version($package);
    }

view all matches for this distribution

Alien-Base-Dino

5 results

corpus/libpalindrome/Makefile.in view on Meta::CPAN

	    new_distdir=$$reldir; \
	    dir1=$$subdir; dir2="$(top_distdir)"; \
	    $(am__relativize); \
	    new_top_distdir=$$reldir; \
	    echo " (cd $$subdir && $(MAKE) $(AM_MAKEFLAGS) top_distdir="$$new_top_distdir" distdir="$$new_distdir" \\"; \
	    echo "     am__remove_distdir=: am__skip_length_check=: am__skip_mode_fix=: distdir)"; \
	    ($(am__cd) $$subdir && \
	      $(MAKE) $(AM_MAKEFLAGS) \
	        top_distdir="$$new_top_distdir" \
	        distdir="$$new_distdir" \
		am__remove_distdir=: \
		am__skip_length_check=: \
		am__skip_mode_fix=: \
	        distdir) \
	      || exit 1; \
	  fi; \
	done

view all matches for this distribution

Alien-Base-ModuleBuild

3 results

lib/Alien/Base/ModuleBuild.pm view on Meta::CPAN

    }

    $repo->{platform} = 'src' unless defined $repo->{platform};

    foreach my $var (@env_overrides) {
        my $var_tail = lc substr($var, length($env_prefix));
        my ($var_protocol, $var_key) = split /_/, $var_tail, 2;

        if ($repo->{protocol} eq $var_protocol) {
            $repo->{$var_key} = $ENV{$var};
        }

view all matches for this distribution

Alien-Base-Wrapper

1 match

}

pass 'okay';

my $max = 1;
$max = $_ > $max ? $_ : $max for map { length $_ } @modules;
our $format = "%-${max}s %s"; 

spacer;

my @keys = sort grep /(MOJO|PERL|\A(LC|HARNESS)_|\A(SHELL|LANG)\Z)/i, keys %ENV;

view all matches for this distribution

Alien-Base

1 match

lib/Alien/Base.pm view on Meta::CPAN


    $pcdata =~ s/\s*$//;

    if($self->config('system_provides')) {
      if(my $system_provides = $self->config('system_provides')->{$keyword}) {
        $pcdata = length $pcdata ? "$pcdata $system_provides" : $system_provides;
      }
    }

    return $pcdata;
  }

view all matches for this distribution

Alien-BatToExeConverter

2 results

inc/Module/Install.pm view on Meta::CPAN


sub _version ($) {
	my $s = shift || 0;
	   $s =~ s/^(\d+)\.?//;
	my $l = $1 || 0;
	my @v = map { $_ . '0' x (3 - length $_) } $s =~ /(\d{1,3})\D?/g;
	   $l = $l . '.' . join '', @v if @v;
	return $l + 0;
}

# Cloned from Params::Util::_CLASS

view all matches for this distribution

Alien-Bazel

1 match

t/00-report-prereqs.t view on Meta::CPAN

        }

        if ( @reports ) {
            push @full_reports, "=== $title ===\n\n";

            my $ml = _max( map { length $_->[0] } @reports );
            my $wl = _max( map { length $_->[1] } @reports );
            my $hl = _max( map { length $_->[2] } @reports );

            if ($type eq 'modules') {
                splice @reports, 1, 0, ["-" x $ml, "", "-" x $hl];
                push @full_reports, map { sprintf("    %*s %*s\n", -$ml, $_->[0], $hl, $_->[2]) } @reports;
            }

view all matches for this distribution

Alien-Brotli

1 match

t/00-report-prereqs.t view on Meta::CPAN

        }

        if ( @reports ) {
            push @full_reports, "=== $title ===\n\n";

            my $ml = _max( map { length $_->[0] } @reports );
            my $wl = _max( map { length $_->[1] } @reports );
            my $hl = _max( map { length $_->[2] } @reports );

            if ($type eq 'modules') {
                splice @reports, 1, 0, ["-" x $ml, "", "-" x $hl];
                push @full_reports, map { sprintf("    %*s %*s\n", -$ml, $_->[0], $hl, $_->[2]) } @reports;
            }

view all matches for this distribution

Alien-Build-Git

1 match

}

pass 'okay';

my $max = 1;
$max = $_ > $max ? $_ : $max for map { length $_ } @modules;
our $format = "%-${max}s %s";

spacer;

my @keys = sort grep /(MOJO|PERL|\A(LC|HARNESS)_|\A(SHELL|LANG)\Z)/i, keys %ENV;

view all matches for this distribution

Alien-Build-MB

1 match

}

pass 'okay';

my $max = 1;
$max = $_ > $max ? $_ : $max for map { length $_ } @modules;
our $format = "%-${max}s %s";

spacer;

my @keys = sort grep /(MOJO|PERL|\A(LC|HARNESS)_|\A(SHELL|LANG)\Z)/i, keys %ENV;

view all matches for this distribution

Alien-Build-Plugin-Build-Make

1 match

}

pass 'okay';

my $max = 1;
$max = $_ > $max ? $_ : $max for map { length $_ } @modules;
our $format = "%-${max}s %s"; 

spacer;

my @keys = sort grep /(MOJO|PERL|\A(LC|HARNESS)_|\A(SHELL|LANG)\Z)/i, keys %ENV;

view all matches for this distribution

Alien-Build-Plugin-Cleanse-BuildDir

1 match

}

pass 'okay';

my $max = 1;
$max = $_ > $max ? $_ : $max for map { length $_ } @modules;
our $format = "%-${max}s %s"; 

spacer;

my @keys = sort grep /(MOJO|PERL|\A(LC|HARNESS)_|\A(SHELL|LANG)\Z)/i, keys %ENV;

view all matches for this distribution

Alien-Build-Plugin-Decode-Mojo

1 match

}

pass 'okay';

my $max = 1;
$max = $_ > $max ? $_ : $max for map { length $_ } @modules;
our $format = "%-${max}s %s"; 

spacer;

my @keys = sort grep /(MOJO|PERL|\A(LC|HARNESS)_|\A(SHELL|LANG)\Z)/i, keys %ENV;

view all matches for this distribution

Alien-Build-Plugin-Decode-SourceForge

1 match

}

pass 'okay';

my $max = 1;
$max = $_ > $max ? $_ : $max for map { length $_ } @modules;
our $format = "%-${max}s %s"; 

spacer;

my @keys = sort grep /(MOJO|PERL|\A(LC|HARNESS)_|\A(SHELL|LANG)\Z)/i, keys %ENV;

view all matches for this distribution

Alien-Build

8 results