Data-Iterator-SlidingWindow

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

         "share",
         "eg",
         "examples",
         "author",
         "builder"
      ]
   },
   "prereqs" : {
      "build" : {
         "requires" : {
            "Test::Fatal" : "0.008",
            "Test::More" : "0.98"
         }
      },
      "configure" : {
         "requires" : {
            "CPAN::Meta" : "0",
            "CPAN::Meta::Prereqs" : "0",
            "Module::Build" : "0.38"
         }
      },

META.yml  view on Meta::CPAN

---
abstract: 'Iteration data with Sliding Window Algorithm'
author:
  - 'Hideaki Ohno <hide.o.j55{at}gmail.com>'
build_requires:
  Test::Fatal: '0.008'
  Test::More: '0.98'
configure_requires:
  CPAN::Meta: '0'
  CPAN::Meta::Prereqs: '0'
  Module::Build: '0.38'
dynamic_config: 0
generated_by: 'Minilla/v1.1.0, CPAN::Meta::Converter version 2.141170'
license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html

cpanfile  view on Meta::CPAN

requires 'Exporter';
requires 'parent';
requires 'perl', '5.008001';

on build => sub {
    requires 'Test::Fatal', '0.008';
    requires 'Test::More', '0.98';
};

t/01_basic.t  view on Meta::CPAN

use strict;
use warnings;
use Test::More;
use Test::Fatal qw(exception);
use Data::Iterator::SlidingWindow;

my @list = ( 0 .. 20 );

my $iter = iterator 3 => \@list;

isa_ok $iter, 'Data::Iterator::SlidingWindow';

my @w1;
while ( my $data = $iter->next ) {