package Kubernetes::REST::Logs; use Moo; use Kubernetes::REST::CallContext; has param_converter => (is => 'ro', required => 1); has io => (is => 'ro', required => 1); has result_parser => (is => 'ro', required => 1); has server => (is => 'ro', required => 1); has credentials => (is => 'ro', required => 1); has api_version => (is => 'ro', required => 1); sub _invoke_unversioned { my ($self, $method, $params) = @_; my $call = Kubernetes::REST::CallContext->new( method => $method, params => $params, server => $self->server, credentials => $self->credentials, ); my $req = $self->param_converter->params2request($call); my $result = $self->io->call($call, $req); return $self->result_parser->result2return($call, $req, $result); } sub _invoke_versioned { my ($self, $method, $params) = @_; my $call = Kubernetes::REST::CallContext->new( method => $self->api_version . '::Logs::' . $method, params => $params, server => $self->server, credentials => $self->credentials, ); my $req = $self->param_converter->params2request($call); my $result = $self->io->call($call, $req); return $self->result_parser->result2return($call, $req, $result); } sub LogFileHandler { my ($self, @params) = @_; $self->_invoke_unversioned('LogFileHandler', \@params); } sub LogFileListHandler { my ($self, @params) = @_; $self->_invoke_unversioned('LogFileListHandler', \@params); } 1;