ntly this module has the following dependencies:
=over
=item *
Eixo::Base >= 1.200,
=item *
JSON >= 2.50,
=item *
Data::UUID >= 1,
=item *
MongoDB >= 0.708,
=back
=head1 CAVEATS
=head1
package Eixo::Queue::Job;
use strict;
use Eixo::Base::Clase;
use JSON;
use Data::UUID;
use Eixo::Queue::JobCifrador;
my $UUID_INSTANCE;
BEGIN{
$UUID_INSTANCE = Data::UUID->new;
}
sub WAITING
grep{
!$NO_SERIALIZE{$_}
}
keys(%{ $_[0] })
}
}
sub TO_JSON {
$_[0]->to_hash
}
sub copy{
my ($self, $j) = @_;
$self->{$_} = $j->{$_} foreach(ke
) = @_;
JSON->new->convert_blessed->encode( $self )
}
sub unserialize{
my ($package, $data) = @_;
if(ref($package)){
$package = ref($package);
}
bless(JSON->new->decode
ntly this module has the following dependencies:
=over
=item *
Eixo::Base >= 1.200,
=item *
JSON >= 2.50,
=item *
Data::UUID >= 1,
=item *
MongoDB >= 0.708,
=back
=head1 CAVEATS
=head1