l dev libraries installed in system.
In ubuntu/debian:
apt-get install libssl-dev
=item *
JSON >= 2.50,
=item *
Net::HTTP >= 6.06,
=item *
HTTP::Server::Simple::CGI (for testing purpose)
package Eixo::Docker::EventRegister;
use strict;
use JSON;
use IO::Select;
use Eixo::Docker::EventPool;
use Eixo::Docker::Event;
sub new{
return bless({
api=>$_[1],
frequency=>$_[2],
pid
->getline){
push @lines, $l;
}
foreach(grep { $_ =~ /\w/ } @lines){
push @{$self->{pool}}, JSON->new->decode($_);
}
}
sub __runEvents{
my ($self) = @_;
foreach my $e (@{$self->{pool}}){
package Eixo::Docker;
use 5.008;
use strict;
use warnings;
use Eixo::Base::Clase;
use JSON;
use Net::HTTP;
use Eixo::Rest::Client;
# Items to export into callers namespace by default. Note: do not
2,
Name => "on-failure"
},
LogConfig => {
Config => {},
Type => "json-file"
},
SecurityOpt => undef,
VolumesFrom => undef,
Ulimits => [],
CgroupPar
::Docker::Events;
use strict;
use warnings;
use Eixo::Base::Clase qw(Eixo::Rest::Product);
use JSON;
my $DEFAULT_TIMEOUT = 30;
has(
Events=>[]
);
sub initialize {
my ($self, @args) =
= JSON->new->encode($args{filters});
}
$self->api->getEvents(
get_params=>[qw(filters since until)],
args=>\%args,
__callback => sub {
my ($events, $request) = @_;
my $j = JSON->
package Eixo::Docker::EventPool;
use strict;
use IO::Handle;
use JSON;
sub new{
return bless({
filter=>$_[1] || undef,
api=>$_[2],
frequency=>$_[3]
}, $_[0]);
}
sub create{
my ($se
Events{
my ($self, $events) = @_;
my $w = $self->{writer};
my $json = JSON->new;
foreach my $e (@{$events->{Events}}){
print $w $json->encode($e) . "\n";
}
$events->{Events} = [];
}
1;
# ],
# 'Cpuset' => '',
# 'MemorySwap' => 0,
# 'AttachStdin' => bless( do{\(my $o = 1)}, 'JSON::XS::Boolean' ),
# 'AttachStderr' => $VAR1->{'Config'}{'AttachStdin'},
# 'CpuShares' => 0,
# 'Ope
=> $params,
onProgress => sub {
my $resp;
# Must eval json decode, because json string could be chunked,
# so decode could launch exception and breaks im
# see https://github.com/alambike/eixo-docker/issues/4
eval{
$resp = JSON->new->utf8->decode($_[0]);
};
if($resp->{"error"}){
l dev libraries installed in system.
In ubuntu/debian:
apt-get install libssl-dev
=item *
JSON >= 2.50,
=item *
Net::HTTP >= 6.06,
=item *
HTTP::Server::Simple::CGI (for testing purpose)