Data-Queue

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

      "configure" : {
         "requires" : {
            "ExtUtils::MakeMaker" : "0"
         }
      },
      "runtime" : {
         "requires" : {
            "Carp" : "1.42",
            "Data::Dumper" : "2.161",
            "Data::Result" : "1.000",
            "Modern::Perl" : "1.20170117",
            "Moo" : "2.003002",
            "MooX::Types::MooseLike::Base" : "0.29",
            "Test::More" : "1.302073",
            "namespace::clean" : "0.27",
            "overload" : "1.28"
         }
      }
   },
   "release_status" : "stable",
   "version" : "1.0002",

META.yml  view on Meta::CPAN

  version: '1.4'
name: Data-Queue
no_index:
  directory:
    - t
    - inc
requires:
  Carp: '1.42'
  Data::Dumper: '2.161'
  Data::Result: '1.000'
  Modern::Perl: '1.20170117'
  Moo: '2.003002'
  MooX::Types::MooseLike::Base: '0.29'
  Test::More: '1.302073'
  namespace::clean: '0.27'
  overload: '1.28'
version: '1.0002'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'

Makefile.PL  view on Meta::CPAN

# See lib/ExtUtils/MakeMaker.pm for details of how to influence
# the contents of the Makefile that is written.
WriteMakefile(
    NAME              => 'Data::Queue',
    VERSION_FROM      => 'lib/Data/Queue.pm', # finds $VERSION
    LICENSE=>'perl_5',
    PREREQ_PM         => {
    qw(
      Moo  2.003002
      overload 1.28
      Modern::Perl 1.20170117
      MooX::Types::MooseLike::Base 0.29
      Carp 1.42
      namespace::clean 0.27
      Data::Dumper  2.161
      Test::More    1.302073
      Data::Result  1.000
    )
    
    }, # e.g., Module::Name => 1.1
    ($] >= 5.005 ?     ## Add these new keywords supported since 5.005

lib/Data/Queue.pm  view on Meta::CPAN

  while($stack->has_next) {
    my ($id,$job)=$stack->get_next;
  }

=head1 DESCRIPTION

Stack, with the ablity to add and remove elements by id on the fly. Elements go in and out of the stack in the id order.

=cut

use Modern::Perl;
use Moo;
use Data::Result;
use namespace::clean;
our $VERSION='1.0002';

with 'Data::Result::Moo';

sub BUILD {
  my ($self,$args)=@_;
  my $data={};

t/Data-Queue.t  view on Meta::CPAN

use Modern::Perl;
use Test::More qw(no_plan);
use Data::Dumper;
use Carp qw(confess);
use Data::Dumper;
BEGIN { $SIG{__DIE__} = sub { confess @_ }; }

require_ok('Data::Queue');
use_ok('Data::Queue');