Na}{

File Content: `ArrayLength.pm`

use strict;
use warnings;

package Test::Deep::ArrayLength;

use Test::Deep::Ref;

sub init
{
  my $self = shift;

  my $val = shift;

  $self->{val} = $val;
}

sub descend
{
  my $self = shift;
  my $got = shift;

  my $exp = $self->{val};

  return 0 unless $self->test_reftype($got, "ARRAY");

  return Test::Deep::descend($got, Test::Deep::arraylengthonly($exp));
}

1;

Name	Size	Permission
Cache	---	0755
All.pm	702 bytes	0444
Any.pm	908 bytes	0444
Array.pm	477 bytes	0444
ArrayEach.pm	517 bytes	0444
ArrayElementsOnly.pm	677 bytes	0444
ArrayLength.pm	374 bytes	0444
ArrayLengthOnly.pm	654 bytes	0444
Blessed.pm	564 bytes	0444
Boolean.pm	558 bytes	0444
Cache.pm	1032 bytes	0444
Class.pm	363 bytes	0444
Cmp.pm	1153 bytes	0444
Code.pm	705 bytes	0444
Hash.pm	1413 bytes	0444
HashEach.pm	326 bytes	0444
HashElements.pm	1267 bytes	0444
HashKeys.pm	999 bytes	0444
HashKeysOnly.pm	1541 bytes	0444
Ignore.pm	186 bytes	0444
Isa.pm	538 bytes	0444
ListMethods.pm	288 bytes	0444
MM.pm	922 bytes	0444
Methods.pm	1312 bytes	0444
NoTest.pm	766 bytes	0444
None.pm	869 bytes	0444
Number.pm	1088 bytes	0444
Obj.pm	522 bytes	0444
Ref.pm	490 bytes	0444
RefType.pm	547 bytes	0444
Regexp.pm	1408 bytes	0444
RegexpMatches.pm	662 bytes	0444
RegexpOnly.pm	521 bytes	0444
RegexpRef.pm	639 bytes	0444
RegexpRefOnly.pm	423 bytes	0444
RegexpVersion.pm	280 bytes	0444
ScalarRef.pm	432 bytes	0444
ScalarRefOnly.pm	384 bytes	0444
Set.pm	3696 bytes	0444
Shallow.pm	597 bytes	0444
Stack.pm	1076 bytes	0444
String.pm	369 bytes	0444

File Content: ArrayLength.pm

File Content: `ArrayLength.pm`