rtcat::Client::DocumentApi;
require 5.6.0;
use strict;
use warnings;
use utf8;
use Exporter;
use JSON;
use Carp qw( croak );
use Log::Any qw($log);
use Smartcat::Client::ApiClient;
use base "Class:
ms->{'Content-Type'} = $self->{api_client}
->select_header_content_type( 'application/json', 'text/json' );
# query params
if ( exists $args{'document_id'} ) {
$query_params->{'
ms->{'Content-Type'} = $self->{api_client}
->select_header_content_type( 'application/json', 'text/json' );
# query params
if ( exists $args{'document_id'} ) {
$query_params->{'
t::Client::Object::ExecutiveModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
ct::ProjectTranslationMemoryModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
:ModelWithFilesCreateProjectModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
cat::Client::Object::SegmentModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
::Object::DocumentStatisticsModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
cat::Client::Object::ProjectModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
t::Object::TranslationMemoryModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
Client::Object::TMImportTaskModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
cat::Client::Object::ServiceModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
::BilingualFileImportSetingsModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
at::Client::Object::MTEngineModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
ilesUploadDocumentPropertiesModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
::Object::ExportDocumentTaskModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
::Client::Object::LspServiceModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
artcat::Client::Object::Executive;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
lient::Object::StatisticsRowModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
:Client::Object::TMMatchesRequest;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
at::Client::Object::DocumentModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array
t::ProjectStatisticsObsoleteModel;
require 5.6.0;
use strict;
use warnings;
use utf8;
use JSON qw(decode_json);
use Data::Dumper;
use Module::Runtime qw(use_module);
use Log::Any qw($log);
use Date::
# return perl hash
sub to_hash {
return decode_json( JSON->new->convert_blessed->encode(shift) );
}
# used by JSON for serialization
sub TO_JSON {
my $self = shift;
my $_data = {};
f
alize the data
while ( my ( $_key, $_type ) = each %{ $self->swagger_types } ) {
my $_json_attribute = $self->attribute_map->{$_key};
if ( $_type =~ /^array\[/i ) { # array