From 1efeb92f6b686efcbde5331d4a49de2205c10fd4 Mon Sep 17 00:00:00 2001 From: William Cheng Date: Sat, 30 May 2020 17:00:22 +0800 Subject: [PATCH] Migrate Perl samples to use OAS v3 spec (#6490) * update perl samples to use oas3 * test perl in travis ci * fix uri query * fix comment * fix bearer token * fix add pet * update body to pet --- .travis.yml | 3 + bin/perl-petstore.sh | 2 +- .../main/resources/perl/ApiClient.mustache | 4 +- pom.xml | 2 +- .../petstore/perl/.openapi-generator/FILES | 52 ++--- samples/client/petstore/perl/README.md | 95 +++++---- .../perl/docs/AdditionalPropertiesClass.md | 13 +- .../petstore/perl/docs/AnotherFakeApi.md | 8 +- samples/client/petstore/perl/docs/EnumTest.md | 3 + samples/client/petstore/perl/docs/FakeApi.md | 137 +++++++++---- .../perl/docs/FakeClassnameTags123Api.md | 8 +- .../client/petstore/perl/docs/FormatTest.md | 3 +- samples/client/petstore/perl/docs/PetApi.md | 16 +- samples/client/petstore/perl/docs/StoreApi.md | 10 +- samples/client/petstore/perl/docs/UserApi.md | 40 ++-- .../lib/WWW/OpenAPIClient/AnotherFakeApi.pm | 14 +- .../perl/lib/WWW/OpenAPIClient/ApiClient.pm | 8 + .../perl/lib/WWW/OpenAPIClient/FakeApi.pm | 185 ++++++++++++------ .../OpenAPIClient/FakeClassnameTags123Api.pm | 14 +- .../Object/AdditionalPropertiesClass.pm | 97 +-------- .../lib/WWW/OpenAPIClient/Object/EnumTest.pm | 34 +++- .../WWW/OpenAPIClient/Object/FormatTest.pm | 22 ++- .../perl/lib/WWW/OpenAPIClient/PetApi.pm | 28 +-- .../perl/lib/WWW/OpenAPIClient/StoreApi.pm | 16 +- .../perl/lib/WWW/OpenAPIClient/UserApi.pm | 64 +++--- .../client/petstore/perl/tests/01_pet_api.t | 2 +- .../petstore/perl/tests/03_api_factory.t | 2 +- samples/client/petstore/perl/tests/04_role.t | 2 +- 28 files changed, 494 insertions(+), 390 deletions(-) diff --git a/.travis.yml b/.travis.yml index 471a4bef9c7..d8493d013f5 100644 --- a/.travis.yml +++ b/.travis.yml @@ -101,6 +101,9 @@ before_install: # install Qt5 - sudo apt install -y --no-install-recommends qt5-default - cmake --version + # perl dep + - cpanm --local-lib=~/perl5 local::lib && eval $(perl -I ~/perl5/lib/perl5/ -Mlocal::lib) + - cpanm --quiet --no-interactive Test::Exception Test::More Log::Any LWP::UserAgent URI::Query Module::Runtime DateTime Module::Find Moose::Role JSON || echo "Igorned failure from cpanm" # show host table to confirm petstore.swagger.io is mapped to localhost - cat /etc/hosts # show java version diff --git a/bin/perl-petstore.sh b/bin/perl-petstore.sh index 48974454b73..e4864503b1e 100755 --- a/bin/perl-petstore.sh +++ b/bin/perl-petstore.sh @@ -28,6 +28,6 @@ fi # if you've executed sbt assembly previously it will use that instead. export JAVA_OPTS="${JAVA_OPTS} -Xmx1024M -DloggerPath=conf/log4j.properties" # complex module name used for testing -ags="generate -i modules/openapi-generator/src/test/resources/2_0/petstore-with-fake-endpoints-models-for-testing.yaml -g perl -o samples/client/petstore/perl --additional-properties hideGenerationTimestamp=true $@" +ags="generate -i modules/openapi-generator/src/test/resources/3_0/petstore-with-fake-endpoints-models-for-testing.yaml -g perl -o samples/client/petstore/perl --additional-properties hideGenerationTimestamp=true $@" java $JAVA_OPTS -jar $executable $ags diff --git a/modules/openapi-generator/src/main/resources/perl/ApiClient.mustache b/modules/openapi-generator/src/main/resources/perl/ApiClient.mustache index 4c8b48cc136..a9144e2d6bd 100644 --- a/modules/openapi-generator/src/main/resources/perl/ApiClient.mustache +++ b/modules/openapi-generator/src/main/resources/perl/ApiClient.mustache @@ -346,9 +346,9 @@ sub update_params_for_auth { } {{/isBasicBasic}} {{#isBasicBearer}} - // this endpoint requires Bearer{{#bearerFormat}} ({{{.}}}){{/bearerFormat}} authentication (access token) + # this endpoint requires Bearer{{#bearerFormat}} ({{{.}}}){{/bearerFormat}} authentication (access token) if ($self->{config}{access_token}) { - $headers['Authorization'] = 'Bearer ' . $self->{config}{access_token}; + $header_params->{'Authorization'} = 'Bearer ' . $self->{config}{access_token}; } {{/isBasicBearer}} {{/isBasic}} diff --git a/pom.xml b/pom.xml index e88c2f52de6..7d54ebe3da8 100644 --- a/pom.xml +++ b/pom.xml @@ -1181,6 +1181,7 @@ + samples/client/petstore/perl samples/server/petstore/python-aiohttp samples/server/petstore/python-aiohttp-srclayout @@ -1195,7 +1196,6 @@ samples/client/petstore/cpp-qt5 samples/client/petstore/rust samples/client/petstore/rust/reqwest/petstore - samples/client/petstore/php/OpenAPIClient-php samples/openapi3/client/petstore/php/OpenAPIClient-php diff --git a/samples/client/petstore/perl/.openapi-generator/FILES b/samples/client/petstore/perl/.openapi-generator/FILES index 0893f7777ca..6c10be668a0 100644 --- a/samples/client/petstore/perl/.openapi-generator/FILES +++ b/samples/client/petstore/perl/.openapi-generator/FILES @@ -2,28 +2,20 @@ .travis.yml README.md bin/autodoc -docs/AdditionalPropertiesAnyType.md -docs/AdditionalPropertiesArray.md -docs/AdditionalPropertiesBoolean.md docs/AdditionalPropertiesClass.md -docs/AdditionalPropertiesInteger.md -docs/AdditionalPropertiesNumber.md -docs/AdditionalPropertiesObject.md -docs/AdditionalPropertiesString.md docs/Animal.md docs/AnotherFakeApi.md docs/ApiResponse.md docs/ArrayOfArrayOfNumberOnly.md docs/ArrayOfNumberOnly.md docs/ArrayTest.md -docs/BigCat.md -docs/BigCatAllOf.md docs/Capitalization.md docs/Cat.md docs/CatAllOf.md docs/Category.md docs/ClassModel.md docs/Client.md +docs/DefaultApi.md docs/Dog.md docs/DogAllOf.md docs/EnumArrays.md @@ -33,51 +25,53 @@ docs/FakeApi.md docs/FakeClassnameTags123Api.md docs/File.md docs/FileSchemaTestClass.md +docs/Foo.md docs/FormatTest.md docs/HasOnlyReadOnly.md +docs/HealthCheckResult.md +docs/InlineObject.md +docs/InlineObject1.md +docs/InlineObject2.md +docs/InlineObject3.md +docs/InlineObject4.md +docs/InlineObject5.md +docs/InlineResponseDefault.md docs/List.md docs/MapTest.md docs/MixedPropertiesAndAdditionalPropertiesClass.md docs/Model200Response.md docs/ModelReturn.md docs/Name.md +docs/NullableClass.md docs/NumberOnly.md docs/Order.md docs/OuterComposite.md docs/OuterEnum.md +docs/OuterEnumDefaultValue.md +docs/OuterEnumInteger.md +docs/OuterEnumIntegerDefaultValue.md docs/Pet.md docs/PetApi.md docs/ReadOnlyFirst.md docs/SpecialModelName.md docs/StoreApi.md docs/Tag.md -docs/TypeHolderDefault.md -docs/TypeHolderExample.md docs/User.md docs/UserApi.md -docs/XmlItem.md git_push.sh lib/WWW/OpenAPIClient/AnotherFakeApi.pm lib/WWW/OpenAPIClient/ApiClient.pm lib/WWW/OpenAPIClient/ApiFactory.pm lib/WWW/OpenAPIClient/Configuration.pm +lib/WWW/OpenAPIClient/DefaultApi.pm lib/WWW/OpenAPIClient/FakeApi.pm lib/WWW/OpenAPIClient/FakeClassnameTags123Api.pm -lib/WWW/OpenAPIClient/Object/AdditionalPropertiesAnyType.pm -lib/WWW/OpenAPIClient/Object/AdditionalPropertiesArray.pm -lib/WWW/OpenAPIClient/Object/AdditionalPropertiesBoolean.pm lib/WWW/OpenAPIClient/Object/AdditionalPropertiesClass.pm -lib/WWW/OpenAPIClient/Object/AdditionalPropertiesInteger.pm -lib/WWW/OpenAPIClient/Object/AdditionalPropertiesNumber.pm -lib/WWW/OpenAPIClient/Object/AdditionalPropertiesObject.pm -lib/WWW/OpenAPIClient/Object/AdditionalPropertiesString.pm lib/WWW/OpenAPIClient/Object/Animal.pm lib/WWW/OpenAPIClient/Object/ApiResponse.pm lib/WWW/OpenAPIClient/Object/ArrayOfArrayOfNumberOnly.pm lib/WWW/OpenAPIClient/Object/ArrayOfNumberOnly.pm lib/WWW/OpenAPIClient/Object/ArrayTest.pm -lib/WWW/OpenAPIClient/Object/BigCat.pm -lib/WWW/OpenAPIClient/Object/BigCatAllOf.pm lib/WWW/OpenAPIClient/Object/Capitalization.pm lib/WWW/OpenAPIClient/Object/Cat.pm lib/WWW/OpenAPIClient/Object/CatAllOf.pm @@ -91,26 +85,36 @@ lib/WWW/OpenAPIClient/Object/EnumClass.pm lib/WWW/OpenAPIClient/Object/EnumTest.pm lib/WWW/OpenAPIClient/Object/File.pm lib/WWW/OpenAPIClient/Object/FileSchemaTestClass.pm +lib/WWW/OpenAPIClient/Object/Foo.pm lib/WWW/OpenAPIClient/Object/FormatTest.pm lib/WWW/OpenAPIClient/Object/HasOnlyReadOnly.pm +lib/WWW/OpenAPIClient/Object/HealthCheckResult.pm +lib/WWW/OpenAPIClient/Object/InlineObject.pm +lib/WWW/OpenAPIClient/Object/InlineObject1.pm +lib/WWW/OpenAPIClient/Object/InlineObject2.pm +lib/WWW/OpenAPIClient/Object/InlineObject3.pm +lib/WWW/OpenAPIClient/Object/InlineObject4.pm +lib/WWW/OpenAPIClient/Object/InlineObject5.pm +lib/WWW/OpenAPIClient/Object/InlineResponseDefault.pm lib/WWW/OpenAPIClient/Object/List.pm lib/WWW/OpenAPIClient/Object/MapTest.pm lib/WWW/OpenAPIClient/Object/MixedPropertiesAndAdditionalPropertiesClass.pm lib/WWW/OpenAPIClient/Object/Model200Response.pm lib/WWW/OpenAPIClient/Object/ModelReturn.pm lib/WWW/OpenAPIClient/Object/Name.pm +lib/WWW/OpenAPIClient/Object/NullableClass.pm lib/WWW/OpenAPIClient/Object/NumberOnly.pm lib/WWW/OpenAPIClient/Object/Order.pm lib/WWW/OpenAPIClient/Object/OuterComposite.pm lib/WWW/OpenAPIClient/Object/OuterEnum.pm +lib/WWW/OpenAPIClient/Object/OuterEnumDefaultValue.pm +lib/WWW/OpenAPIClient/Object/OuterEnumInteger.pm +lib/WWW/OpenAPIClient/Object/OuterEnumIntegerDefaultValue.pm lib/WWW/OpenAPIClient/Object/Pet.pm lib/WWW/OpenAPIClient/Object/ReadOnlyFirst.pm lib/WWW/OpenAPIClient/Object/SpecialModelName.pm lib/WWW/OpenAPIClient/Object/Tag.pm -lib/WWW/OpenAPIClient/Object/TypeHolderDefault.pm -lib/WWW/OpenAPIClient/Object/TypeHolderExample.pm lib/WWW/OpenAPIClient/Object/User.pm -lib/WWW/OpenAPIClient/Object/XmlItem.pm lib/WWW/OpenAPIClient/PetApi.pm lib/WWW/OpenAPIClient/Role.pm lib/WWW/OpenAPIClient/Role/AutoDoc.pm diff --git a/samples/client/petstore/perl/README.md b/samples/client/petstore/perl/README.md index 2a1a5e9dea2..47e1ef35732 100644 --- a/samples/client/petstore/perl/README.md +++ b/samples/client/petstore/perl/README.md @@ -222,6 +222,7 @@ Each of these calls returns a hashref with various useful pieces of information. To load the API packages: ```perl use WWW::OpenAPIClient::AnotherFakeApi; +use WWW::OpenAPIClient::DefaultApi; use WWW::OpenAPIClient::FakeApi; use WWW::OpenAPIClient::FakeClassnameTags123Api; use WWW::OpenAPIClient::PetApi; @@ -232,21 +233,12 @@ use WWW::OpenAPIClient::UserApi; To load the models: ```perl -use WWW::OpenAPIClient::Object::AdditionalPropertiesAnyType; -use WWW::OpenAPIClient::Object::AdditionalPropertiesArray; -use WWW::OpenAPIClient::Object::AdditionalPropertiesBoolean; use WWW::OpenAPIClient::Object::AdditionalPropertiesClass; -use WWW::OpenAPIClient::Object::AdditionalPropertiesInteger; -use WWW::OpenAPIClient::Object::AdditionalPropertiesNumber; -use WWW::OpenAPIClient::Object::AdditionalPropertiesObject; -use WWW::OpenAPIClient::Object::AdditionalPropertiesString; use WWW::OpenAPIClient::Object::Animal; use WWW::OpenAPIClient::Object::ApiResponse; use WWW::OpenAPIClient::Object::ArrayOfArrayOfNumberOnly; use WWW::OpenAPIClient::Object::ArrayOfNumberOnly; use WWW::OpenAPIClient::Object::ArrayTest; -use WWW::OpenAPIClient::Object::BigCat; -use WWW::OpenAPIClient::Object::BigCatAllOf; use WWW::OpenAPIClient::Object::Capitalization; use WWW::OpenAPIClient::Object::Cat; use WWW::OpenAPIClient::Object::CatAllOf; @@ -260,26 +252,36 @@ use WWW::OpenAPIClient::Object::EnumClass; use WWW::OpenAPIClient::Object::EnumTest; use WWW::OpenAPIClient::Object::File; use WWW::OpenAPIClient::Object::FileSchemaTestClass; +use WWW::OpenAPIClient::Object::Foo; use WWW::OpenAPIClient::Object::FormatTest; use WWW::OpenAPIClient::Object::HasOnlyReadOnly; +use WWW::OpenAPIClient::Object::HealthCheckResult; +use WWW::OpenAPIClient::Object::InlineObject; +use WWW::OpenAPIClient::Object::InlineObject1; +use WWW::OpenAPIClient::Object::InlineObject2; +use WWW::OpenAPIClient::Object::InlineObject3; +use WWW::OpenAPIClient::Object::InlineObject4; +use WWW::OpenAPIClient::Object::InlineObject5; +use WWW::OpenAPIClient::Object::InlineResponseDefault; use WWW::OpenAPIClient::Object::List; use WWW::OpenAPIClient::Object::MapTest; use WWW::OpenAPIClient::Object::MixedPropertiesAndAdditionalPropertiesClass; use WWW::OpenAPIClient::Object::Model200Response; use WWW::OpenAPIClient::Object::ModelReturn; use WWW::OpenAPIClient::Object::Name; +use WWW::OpenAPIClient::Object::NullableClass; use WWW::OpenAPIClient::Object::NumberOnly; use WWW::OpenAPIClient::Object::Order; use WWW::OpenAPIClient::Object::OuterComposite; use WWW::OpenAPIClient::Object::OuterEnum; +use WWW::OpenAPIClient::Object::OuterEnumDefaultValue; +use WWW::OpenAPIClient::Object::OuterEnumInteger; +use WWW::OpenAPIClient::Object::OuterEnumIntegerDefaultValue; use WWW::OpenAPIClient::Object::Pet; use WWW::OpenAPIClient::Object::ReadOnlyFirst; use WWW::OpenAPIClient::Object::SpecialModelName; use WWW::OpenAPIClient::Object::Tag; -use WWW::OpenAPIClient::Object::TypeHolderDefault; -use WWW::OpenAPIClient::Object::TypeHolderExample; use WWW::OpenAPIClient::Object::User; -use WWW::OpenAPIClient::Object::XmlItem; ```` @@ -292,6 +294,7 @@ use strict; use warnings; # load the API package use WWW::OpenAPIClient::AnotherFakeApi; +use WWW::OpenAPIClient::DefaultApi; use WWW::OpenAPIClient::FakeApi; use WWW::OpenAPIClient::FakeClassnameTags123Api; use WWW::OpenAPIClient::PetApi; @@ -299,21 +302,12 @@ use WWW::OpenAPIClient::StoreApi; use WWW::OpenAPIClient::UserApi; # load the models -use WWW::OpenAPIClient::Object::AdditionalPropertiesAnyType; -use WWW::OpenAPIClient::Object::AdditionalPropertiesArray; -use WWW::OpenAPIClient::Object::AdditionalPropertiesBoolean; use WWW::OpenAPIClient::Object::AdditionalPropertiesClass; -use WWW::OpenAPIClient::Object::AdditionalPropertiesInteger; -use WWW::OpenAPIClient::Object::AdditionalPropertiesNumber; -use WWW::OpenAPIClient::Object::AdditionalPropertiesObject; -use WWW::OpenAPIClient::Object::AdditionalPropertiesString; use WWW::OpenAPIClient::Object::Animal; use WWW::OpenAPIClient::Object::ApiResponse; use WWW::OpenAPIClient::Object::ArrayOfArrayOfNumberOnly; use WWW::OpenAPIClient::Object::ArrayOfNumberOnly; use WWW::OpenAPIClient::Object::ArrayTest; -use WWW::OpenAPIClient::Object::BigCat; -use WWW::OpenAPIClient::Object::BigCatAllOf; use WWW::OpenAPIClient::Object::Capitalization; use WWW::OpenAPIClient::Object::Cat; use WWW::OpenAPIClient::Object::CatAllOf; @@ -327,26 +321,36 @@ use WWW::OpenAPIClient::Object::EnumClass; use WWW::OpenAPIClient::Object::EnumTest; use WWW::OpenAPIClient::Object::File; use WWW::OpenAPIClient::Object::FileSchemaTestClass; +use WWW::OpenAPIClient::Object::Foo; use WWW::OpenAPIClient::Object::FormatTest; use WWW::OpenAPIClient::Object::HasOnlyReadOnly; +use WWW::OpenAPIClient::Object::HealthCheckResult; +use WWW::OpenAPIClient::Object::InlineObject; +use WWW::OpenAPIClient::Object::InlineObject1; +use WWW::OpenAPIClient::Object::InlineObject2; +use WWW::OpenAPIClient::Object::InlineObject3; +use WWW::OpenAPIClient::Object::InlineObject4; +use WWW::OpenAPIClient::Object::InlineObject5; +use WWW::OpenAPIClient::Object::InlineResponseDefault; use WWW::OpenAPIClient::Object::List; use WWW::OpenAPIClient::Object::MapTest; use WWW::OpenAPIClient::Object::MixedPropertiesAndAdditionalPropertiesClass; use WWW::OpenAPIClient::Object::Model200Response; use WWW::OpenAPIClient::Object::ModelReturn; use WWW::OpenAPIClient::Object::Name; +use WWW::OpenAPIClient::Object::NullableClass; use WWW::OpenAPIClient::Object::NumberOnly; use WWW::OpenAPIClient::Object::Order; use WWW::OpenAPIClient::Object::OuterComposite; use WWW::OpenAPIClient::Object::OuterEnum; +use WWW::OpenAPIClient::Object::OuterEnumDefaultValue; +use WWW::OpenAPIClient::Object::OuterEnumInteger; +use WWW::OpenAPIClient::Object::OuterEnumIntegerDefaultValue; use WWW::OpenAPIClient::Object::Pet; use WWW::OpenAPIClient::Object::ReadOnlyFirst; use WWW::OpenAPIClient::Object::SpecialModelName; use WWW::OpenAPIClient::Object::Tag; -use WWW::OpenAPIClient::Object::TypeHolderDefault; -use WWW::OpenAPIClient::Object::TypeHolderExample; use WWW::OpenAPIClient::Object::User; -use WWW::OpenAPIClient::Object::XmlItem; # for displaying the API response data use Data::Dumper; @@ -355,10 +359,10 @@ use WWW::OpenAPIClient::; my $api_instance = WWW::OpenAPIClient::->new( ); -my $body = WWW::OpenAPIClient::Object::Client->new(); # Client | client model +my $client = WWW::OpenAPIClient::Object::Client->new(); # Client | client model eval { - my $result = $api_instance->call_123_test_special_tags(body => $body); + my $result = $api_instance->call_123_test_special_tags(client => $client); print Dumper($result); }; if ($@) { @@ -374,7 +378,9 @@ All URIs are relative to *http://petstore.swagger.io:80/v2* Class | Method | HTTP request | Description ------------ | ------------- | ------------- | ------------- *AnotherFakeApi* | [**call_123_test_special_tags**](docs/AnotherFakeApi.md#call_123_test_special_tags) | **PATCH** /another-fake/dummy | To test special tags -*FakeApi* | [**create_xml_item**](docs/FakeApi.md#create_xml_item) | **POST** /fake/create_xml_item | creates an XmlItem +*DefaultApi* | [**foo_get**](docs/DefaultApi.md#foo_get) | **GET** /foo | +*FakeApi* | [**fake_health_get**](docs/FakeApi.md#fake_health_get) | **GET** /fake/health | Health check endpoint +*FakeApi* | [**fake_http_signature_test**](docs/FakeApi.md#fake_http_signature_test) | **GET** /fake/http-signature-test | test http signature authentication *FakeApi* | [**fake_outer_boolean_serialize**](docs/FakeApi.md#fake_outer_boolean_serialize) | **POST** /fake/outer/boolean | *FakeApi* | [**fake_outer_composite_serialize**](docs/FakeApi.md#fake_outer_composite_serialize) | **POST** /fake/outer/composite | *FakeApi* | [**fake_outer_number_serialize**](docs/FakeApi.md#fake_outer_number_serialize) | **POST** /fake/outer/number | @@ -382,7 +388,7 @@ Class | Method | HTTP request | Description *FakeApi* | [**test_body_with_file_schema**](docs/FakeApi.md#test_body_with_file_schema) | **PUT** /fake/body-with-file-schema | *FakeApi* | [**test_body_with_query_params**](docs/FakeApi.md#test_body_with_query_params) | **PUT** /fake/body-with-query-params | *FakeApi* | [**test_client_model**](docs/FakeApi.md#test_client_model) | **PATCH** /fake | To test \"client\" model -*FakeApi* | [**test_endpoint_parameters**](docs/FakeApi.md#test_endpoint_parameters) | **POST** /fake | Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 +*FakeApi* | [**test_endpoint_parameters**](docs/FakeApi.md#test_endpoint_parameters) | **POST** /fake | Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 *FakeApi* | [**test_enum_parameters**](docs/FakeApi.md#test_enum_parameters) | **GET** /fake | To test enum parameters *FakeApi* | [**test_group_parameters**](docs/FakeApi.md#test_group_parameters) | **DELETE** /fake | Fake endpoint to test group parameters (optional) *FakeApi* | [**test_inline_additional_properties**](docs/FakeApi.md#test_inline_additional_properties) | **POST** /fake/inline-additionalProperties | test inline additionalProperties @@ -413,21 +419,12 @@ Class | Method | HTTP request | Description # DOCUMENTATION FOR MODELS - - [WWW::OpenAPIClient::Object::AdditionalPropertiesAnyType](docs/AdditionalPropertiesAnyType.md) - - [WWW::OpenAPIClient::Object::AdditionalPropertiesArray](docs/AdditionalPropertiesArray.md) - - [WWW::OpenAPIClient::Object::AdditionalPropertiesBoolean](docs/AdditionalPropertiesBoolean.md) - [WWW::OpenAPIClient::Object::AdditionalPropertiesClass](docs/AdditionalPropertiesClass.md) - - [WWW::OpenAPIClient::Object::AdditionalPropertiesInteger](docs/AdditionalPropertiesInteger.md) - - [WWW::OpenAPIClient::Object::AdditionalPropertiesNumber](docs/AdditionalPropertiesNumber.md) - - [WWW::OpenAPIClient::Object::AdditionalPropertiesObject](docs/AdditionalPropertiesObject.md) - - [WWW::OpenAPIClient::Object::AdditionalPropertiesString](docs/AdditionalPropertiesString.md) - [WWW::OpenAPIClient::Object::Animal](docs/Animal.md) - [WWW::OpenAPIClient::Object::ApiResponse](docs/ApiResponse.md) - [WWW::OpenAPIClient::Object::ArrayOfArrayOfNumberOnly](docs/ArrayOfArrayOfNumberOnly.md) - [WWW::OpenAPIClient::Object::ArrayOfNumberOnly](docs/ArrayOfNumberOnly.md) - [WWW::OpenAPIClient::Object::ArrayTest](docs/ArrayTest.md) - - [WWW::OpenAPIClient::Object::BigCat](docs/BigCat.md) - - [WWW::OpenAPIClient::Object::BigCatAllOf](docs/BigCatAllOf.md) - [WWW::OpenAPIClient::Object::Capitalization](docs/Capitalization.md) - [WWW::OpenAPIClient::Object::Cat](docs/Cat.md) - [WWW::OpenAPIClient::Object::CatAllOf](docs/CatAllOf.md) @@ -441,26 +438,36 @@ Class | Method | HTTP request | Description - [WWW::OpenAPIClient::Object::EnumTest](docs/EnumTest.md) - [WWW::OpenAPIClient::Object::File](docs/File.md) - [WWW::OpenAPIClient::Object::FileSchemaTestClass](docs/FileSchemaTestClass.md) + - [WWW::OpenAPIClient::Object::Foo](docs/Foo.md) - [WWW::OpenAPIClient::Object::FormatTest](docs/FormatTest.md) - [WWW::OpenAPIClient::Object::HasOnlyReadOnly](docs/HasOnlyReadOnly.md) + - [WWW::OpenAPIClient::Object::HealthCheckResult](docs/HealthCheckResult.md) + - [WWW::OpenAPIClient::Object::InlineObject](docs/InlineObject.md) + - [WWW::OpenAPIClient::Object::InlineObject1](docs/InlineObject1.md) + - [WWW::OpenAPIClient::Object::InlineObject2](docs/InlineObject2.md) + - [WWW::OpenAPIClient::Object::InlineObject3](docs/InlineObject3.md) + - [WWW::OpenAPIClient::Object::InlineObject4](docs/InlineObject4.md) + - [WWW::OpenAPIClient::Object::InlineObject5](docs/InlineObject5.md) + - [WWW::OpenAPIClient::Object::InlineResponseDefault](docs/InlineResponseDefault.md) - [WWW::OpenAPIClient::Object::List](docs/List.md) - [WWW::OpenAPIClient::Object::MapTest](docs/MapTest.md) - [WWW::OpenAPIClient::Object::MixedPropertiesAndAdditionalPropertiesClass](docs/MixedPropertiesAndAdditionalPropertiesClass.md) - [WWW::OpenAPIClient::Object::Model200Response](docs/Model200Response.md) - [WWW::OpenAPIClient::Object::ModelReturn](docs/ModelReturn.md) - [WWW::OpenAPIClient::Object::Name](docs/Name.md) + - [WWW::OpenAPIClient::Object::NullableClass](docs/NullableClass.md) - [WWW::OpenAPIClient::Object::NumberOnly](docs/NumberOnly.md) - [WWW::OpenAPIClient::Object::Order](docs/Order.md) - [WWW::OpenAPIClient::Object::OuterComposite](docs/OuterComposite.md) - [WWW::OpenAPIClient::Object::OuterEnum](docs/OuterEnum.md) + - [WWW::OpenAPIClient::Object::OuterEnumDefaultValue](docs/OuterEnumDefaultValue.md) + - [WWW::OpenAPIClient::Object::OuterEnumInteger](docs/OuterEnumInteger.md) + - [WWW::OpenAPIClient::Object::OuterEnumIntegerDefaultValue](docs/OuterEnumIntegerDefaultValue.md) - [WWW::OpenAPIClient::Object::Pet](docs/Pet.md) - [WWW::OpenAPIClient::Object::ReadOnlyFirst](docs/ReadOnlyFirst.md) - [WWW::OpenAPIClient::Object::SpecialModelName](docs/SpecialModelName.md) - [WWW::OpenAPIClient::Object::Tag](docs/Tag.md) - - [WWW::OpenAPIClient::Object::TypeHolderDefault](docs/TypeHolderDefault.md) - - [WWW::OpenAPIClient::Object::TypeHolderExample](docs/TypeHolderExample.md) - [WWW::OpenAPIClient::Object::User](docs/User.md) - - [WWW::OpenAPIClient::Object::XmlItem](docs/XmlItem.md) # DOCUMENTATION FOR AUTHORIZATION @@ -477,10 +484,18 @@ Class | Method | HTTP request | Description - **API key parameter name**: api_key_query - **Location**: URL query string +## bearer_test + +- **Type**: HTTP basic authentication + ## http_basic_test - **Type**: HTTP basic authentication +## http_signature_test + +- **Type**: HTTP basic authentication + ## petstore_auth - **Type**: OAuth diff --git a/samples/client/petstore/perl/docs/AdditionalPropertiesClass.md b/samples/client/petstore/perl/docs/AdditionalPropertiesClass.md index a878436c1a1..ce21d69c235 100644 --- a/samples/client/petstore/perl/docs/AdditionalPropertiesClass.md +++ b/samples/client/petstore/perl/docs/AdditionalPropertiesClass.md @@ -8,17 +8,8 @@ use WWW::OpenAPIClient::Object::AdditionalPropertiesClass; ## Properties Name | Type | Description | Notes ------------ | ------------- | ------------- | ------------- -**map_string** | **HASH[string,string]** | | [optional] -**map_number** | **HASH[string,double]** | | [optional] -**map_integer** | **HASH[string,int]** | | [optional] -**map_boolean** | **HASH[string,boolean]** | | [optional] -**map_array_integer** | **HASH[string,ARRAY[int]]** | | [optional] -**map_array_anytype** | **HASH[string,ARRAY[object]]** | | [optional] -**map_map_string** | **HASH[string,HASH[string,string]]** | | [optional] -**map_map_anytype** | **HASH[string,HASH[string,object]]** | | [optional] -**anytype_1** | **object** | | [optional] -**anytype_2** | **object** | | [optional] -**anytype_3** | **object** | | [optional] +**map_property** | **HASH[string,string]** | | [optional] +**map_of_map_property** | **HASH[string,HASH[string,string]]** | | [optional] [[Back to Model list]](../README.md#documentation-for-models) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to README]](../README.md) diff --git a/samples/client/petstore/perl/docs/AnotherFakeApi.md b/samples/client/petstore/perl/docs/AnotherFakeApi.md index 87c9e4015b7..a0b0fd6f8ea 100644 --- a/samples/client/petstore/perl/docs/AnotherFakeApi.md +++ b/samples/client/petstore/perl/docs/AnotherFakeApi.md @@ -13,7 +13,7 @@ Method | HTTP request | Description # **call_123_test_special_tags** -> Client call_123_test_special_tags(body => $body) +> Client call_123_test_special_tags(client => $client) To test special tags @@ -26,10 +26,10 @@ use WWW::OpenAPIClient::AnotherFakeApi; my $api_instance = WWW::OpenAPIClient::AnotherFakeApi->new( ); -my $body = WWW::OpenAPIClient::Object::Client->new(); # Client | client model +my $client = WWW::OpenAPIClient::Object::Client->new(); # Client | client model eval { - my $result = $api_instance->call_123_test_special_tags(body => $body); + my $result = $api_instance->call_123_test_special_tags(client => $client); print Dumper($result); }; if ($@) { @@ -41,7 +41,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **body** | [**Client**](Client.md)| client model | + **client** | [**Client**](Client.md)| client model | ### Return type diff --git a/samples/client/petstore/perl/docs/EnumTest.md b/samples/client/petstore/perl/docs/EnumTest.md index aa889b2be86..60ed7418d2a 100644 --- a/samples/client/petstore/perl/docs/EnumTest.md +++ b/samples/client/petstore/perl/docs/EnumTest.md @@ -13,6 +13,9 @@ Name | Type | Description | Notes **enum_integer** | **int** | | [optional] **enum_number** | **double** | | [optional] **outer_enum** | [**OuterEnum**](OuterEnum.md) | | [optional] +**outer_enum_integer** | [**OuterEnumInteger**](OuterEnumInteger.md) | | [optional] +**outer_enum_default_value** | [**OuterEnumDefaultValue**](OuterEnumDefaultValue.md) | | [optional] +**outer_enum_integer_default_value** | [**OuterEnumIntegerDefaultValue**](OuterEnumIntegerDefaultValue.md) | | [optional] [[Back to Model list]](../README.md#documentation-for-models) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to README]](../README.md) diff --git a/samples/client/petstore/perl/docs/FakeApi.md b/samples/client/petstore/perl/docs/FakeApi.md index 23c958d2a00..be76016b63e 100644 --- a/samples/client/petstore/perl/docs/FakeApi.md +++ b/samples/client/petstore/perl/docs/FakeApi.md @@ -9,7 +9,8 @@ All URIs are relative to *http://petstore.swagger.io:80/v2* Method | HTTP request | Description ------------- | ------------- | ------------- -[**create_xml_item**](FakeApi.md#create_xml_item) | **POST** /fake/create_xml_item | creates an XmlItem +[**fake_health_get**](FakeApi.md#fake_health_get) | **GET** /fake/health | Health check endpoint +[**fake_http_signature_test**](FakeApi.md#fake_http_signature_test) | **GET** /fake/http-signature-test | test http signature authentication [**fake_outer_boolean_serialize**](FakeApi.md#fake_outer_boolean_serialize) | **POST** /fake/outer/boolean | [**fake_outer_composite_serialize**](FakeApi.md#fake_outer_composite_serialize) | **POST** /fake/outer/composite | [**fake_outer_number_serialize**](FakeApi.md#fake_outer_number_serialize) | **POST** /fake/outer/number | @@ -17,7 +18,7 @@ Method | HTTP request | Description [**test_body_with_file_schema**](FakeApi.md#test_body_with_file_schema) | **PUT** /fake/body-with-file-schema | [**test_body_with_query_params**](FakeApi.md#test_body_with_query_params) | **PUT** /fake/body-with-query-params | [**test_client_model**](FakeApi.md#test_client_model) | **PATCH** /fake | To test \"client\" model -[**test_endpoint_parameters**](FakeApi.md#test_endpoint_parameters) | **POST** /fake | Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 +[**test_endpoint_parameters**](FakeApi.md#test_endpoint_parameters) | **POST** /fake | Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 [**test_enum_parameters**](FakeApi.md#test_enum_parameters) | **GET** /fake | To test enum parameters [**test_group_parameters**](FakeApi.md#test_group_parameters) | **DELETE** /fake | Fake endpoint to test group parameters (optional) [**test_inline_additional_properties**](FakeApi.md#test_inline_additional_properties) | **POST** /fake/inline-additionalProperties | test inline additionalProperties @@ -25,12 +26,10 @@ Method | HTTP request | Description [**test_query_parameter_collection_format**](FakeApi.md#test_query_parameter_collection_format) | **PUT** /fake/test-query-paramters | -# **create_xml_item** -> create_xml_item(xml_item => $xml_item) +# **fake_health_get** +> HealthCheckResult fake_health_get() -creates an XmlItem - -this route creates an XmlItem +Health check endpoint ### Example ```perl @@ -39,25 +38,22 @@ use WWW::OpenAPIClient::FakeApi; my $api_instance = WWW::OpenAPIClient::FakeApi->new( ); -my $xml_item = WWW::OpenAPIClient::Object::XmlItem->new(); # XmlItem | XmlItem Body eval { - $api_instance->create_xml_item(xml_item => $xml_item); + my $result = $api_instance->fake_health_get(); + print Dumper($result); }; if ($@) { - warn "Exception when calling FakeApi->create_xml_item: $@\n"; + warn "Exception when calling FakeApi->fake_health_get: $@\n"; } ``` ### Parameters - -Name | Type | Description | Notes -------------- | ------------- | ------------- | ------------- - **xml_item** | [**XmlItem**](XmlItem.md)| XmlItem Body | +This endpoint does not need any parameter. ### Return type -void (empty response body) +[**HealthCheckResult**](HealthCheckResult.md) ### Authorization @@ -65,7 +61,57 @@ No authorization required ### HTTP request headers - - **Content-Type**: application/xml, application/xml; charset=utf-8, application/xml; charset=utf-16, text/xml, text/xml; charset=utf-8, text/xml; charset=utf-16 + - **Content-Type**: Not defined + - **Accept**: application/json + +[[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) + +# **fake_http_signature_test** +> fake_http_signature_test(pet => $pet, query_1 => $query_1, header_1 => $header_1) + +test http signature authentication + +### Example +```perl +use Data::Dumper; +use WWW::OpenAPIClient::FakeApi; +my $api_instance = WWW::OpenAPIClient::FakeApi->new( + + # Configure HTTP basic authorization: http_signature_test + +); + +my $pet = WWW::OpenAPIClient::Object::Pet->new(); # Pet | Pet object that needs to be added to the store +my $query_1 = "query_1_example"; # string | query parameter +my $header_1 = "header_1_example"; # string | header parameter + +eval { + $api_instance->fake_http_signature_test(pet => $pet, query_1 => $query_1, header_1 => $header_1); +}; +if ($@) { + warn "Exception when calling FakeApi->fake_http_signature_test: $@\n"; +} +``` + +### Parameters + +Name | Type | Description | Notes +------------- | ------------- | ------------- | ------------- + **pet** | [**Pet**](Pet.md)| Pet object that needs to be added to the store | + **query_1** | **string**| query parameter | [optional] + **header_1** | **string**| header parameter | [optional] + +### Return type + +void (empty response body) + +### Authorization + +[http_signature_test](../README.md#http_signature_test) + +### HTTP request headers + + - **Content-Type**: application/json, application/xml - **Accept**: Not defined [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) @@ -111,13 +157,13 @@ No authorization required ### HTTP request headers - - **Content-Type**: Not defined + - **Content-Type**: application/json - **Accept**: */* [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) # **fake_outer_composite_serialize** -> OuterComposite fake_outer_composite_serialize(body => $body) +> OuterComposite fake_outer_composite_serialize(outer_composite => $outer_composite) @@ -130,10 +176,10 @@ use WWW::OpenAPIClient::FakeApi; my $api_instance = WWW::OpenAPIClient::FakeApi->new( ); -my $body = WWW::OpenAPIClient::Object::OuterComposite->new(); # OuterComposite | Input composite as post body +my $outer_composite = WWW::OpenAPIClient::Object::OuterComposite->new(); # OuterComposite | Input composite as post body eval { - my $result = $api_instance->fake_outer_composite_serialize(body => $body); + my $result = $api_instance->fake_outer_composite_serialize(outer_composite => $outer_composite); print Dumper($result); }; if ($@) { @@ -145,7 +191,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **body** | [**OuterComposite**](OuterComposite.md)| Input composite as post body | [optional] + **outer_composite** | [**OuterComposite**](OuterComposite.md)| Input composite as post body | [optional] ### Return type @@ -157,7 +203,7 @@ No authorization required ### HTTP request headers - - **Content-Type**: Not defined + - **Content-Type**: application/json - **Accept**: */* [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) @@ -203,7 +249,7 @@ No authorization required ### HTTP request headers - - **Content-Type**: Not defined + - **Content-Type**: application/json - **Accept**: */* [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) @@ -249,13 +295,13 @@ No authorization required ### HTTP request headers - - **Content-Type**: Not defined + - **Content-Type**: application/json - **Accept**: */* [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) # **test_body_with_file_schema** -> test_body_with_file_schema(body => $body) +> test_body_with_file_schema(file_schema_test_class => $file_schema_test_class) @@ -268,10 +314,10 @@ use WWW::OpenAPIClient::FakeApi; my $api_instance = WWW::OpenAPIClient::FakeApi->new( ); -my $body = WWW::OpenAPIClient::Object::FileSchemaTestClass->new(); # FileSchemaTestClass | +my $file_schema_test_class = WWW::OpenAPIClient::Object::FileSchemaTestClass->new(); # FileSchemaTestClass | eval { - $api_instance->test_body_with_file_schema(body => $body); + $api_instance->test_body_with_file_schema(file_schema_test_class => $file_schema_test_class); }; if ($@) { warn "Exception when calling FakeApi->test_body_with_file_schema: $@\n"; @@ -282,7 +328,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **body** | [**FileSchemaTestClass**](FileSchemaTestClass.md)| | + **file_schema_test_class** | [**FileSchemaTestClass**](FileSchemaTestClass.md)| | ### Return type @@ -300,7 +346,7 @@ No authorization required [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) # **test_body_with_query_params** -> test_body_with_query_params(query => $query, body => $body) +> test_body_with_query_params(query => $query, user => $user) @@ -312,10 +358,10 @@ my $api_instance = WWW::OpenAPIClient::FakeApi->new( ); my $query = "query_example"; # string | -my $body = WWW::OpenAPIClient::Object::User->new(); # User | +my $user = WWW::OpenAPIClient::Object::User->new(); # User | eval { - $api_instance->test_body_with_query_params(query => $query, body => $body); + $api_instance->test_body_with_query_params(query => $query, user => $user); }; if ($@) { warn "Exception when calling FakeApi->test_body_with_query_params: $@\n"; @@ -327,7 +373,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- **query** | **string**| | - **body** | [**User**](User.md)| | + **user** | [**User**](User.md)| | ### Return type @@ -345,7 +391,7 @@ No authorization required [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) # **test_client_model** -> Client test_client_model(body => $body) +> Client test_client_model(client => $client) To test \"client\" model @@ -358,10 +404,10 @@ use WWW::OpenAPIClient::FakeApi; my $api_instance = WWW::OpenAPIClient::FakeApi->new( ); -my $body = WWW::OpenAPIClient::Object::Client->new(); # Client | client model +my $client = WWW::OpenAPIClient::Object::Client->new(); # Client | client model eval { - my $result = $api_instance->test_client_model(body => $body); + my $result = $api_instance->test_client_model(client => $client); print Dumper($result); }; if ($@) { @@ -373,7 +419,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **body** | [**Client**](Client.md)| client model | + **client** | [**Client**](Client.md)| client model | ### Return type @@ -393,9 +439,9 @@ No authorization required # **test_endpoint_parameters** > test_endpoint_parameters(number => $number, double => $double, pattern_without_delimiter => $pattern_without_delimiter, byte => $byte, integer => $integer, int32 => $int32, int64 => $int64, float => $float, string => $string, binary => $binary, date => $date, date_time => $date_time, password => $password, callback => $callback) -Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 +Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 -Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 +Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 ### Example ```perl @@ -537,6 +583,11 @@ Fake endpoint to test group parameters (optional) use Data::Dumper; use WWW::OpenAPIClient::FakeApi; my $api_instance = WWW::OpenAPIClient::FakeApi->new( + + # Configure HTTP basic authorization: bearer_test + # Configure bearer access token for authorization: bearer_test + access_token => 'YOUR_BEARER_TOKEN', + ); my $required_string_group = 56; # int | Required String in group parameters @@ -571,7 +622,7 @@ void (empty response body) ### Authorization -No authorization required +[bearer_test](../README.md#bearer_test) ### HTTP request headers @@ -581,7 +632,7 @@ No authorization required [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) # **test_inline_additional_properties** -> test_inline_additional_properties(param => $param) +> test_inline_additional_properties(request_body => $request_body) test inline additionalProperties @@ -592,10 +643,10 @@ use WWW::OpenAPIClient::FakeApi; my $api_instance = WWW::OpenAPIClient::FakeApi->new( ); -my $param = WWW::OpenAPIClient::Object::HASH[string,string]->new(); # HASH[string,string] | request body +my $request_body = WWW::OpenAPIClient::Object::HASH[string,string]->new(); # HASH[string,string] | request body eval { - $api_instance->test_inline_additional_properties(param => $param); + $api_instance->test_inline_additional_properties(request_body => $request_body); }; if ($@) { warn "Exception when calling FakeApi->test_inline_additional_properties: $@\n"; @@ -606,7 +657,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **param** | [**HASH[string,string]**](string.md)| request body | + **request_body** | [**HASH[string,string]**](string.md)| request body | ### Return type diff --git a/samples/client/petstore/perl/docs/FakeClassnameTags123Api.md b/samples/client/petstore/perl/docs/FakeClassnameTags123Api.md index 70e303f7bf0..67c2122cb6f 100644 --- a/samples/client/petstore/perl/docs/FakeClassnameTags123Api.md +++ b/samples/client/petstore/perl/docs/FakeClassnameTags123Api.md @@ -13,7 +13,7 @@ Method | HTTP request | Description # **test_classname** -> Client test_classname(body => $body) +> Client test_classname(client => $client) To test class name in snake case @@ -31,10 +31,10 @@ my $api_instance = WWW::OpenAPIClient::FakeClassnameTags123Api->new( #api_key_prefix => {'api_key_query' => 'Bearer'}, ); -my $body = WWW::OpenAPIClient::Object::Client->new(); # Client | client model +my $client = WWW::OpenAPIClient::Object::Client->new(); # Client | client model eval { - my $result = $api_instance->test_classname(body => $body); + my $result = $api_instance->test_classname(client => $client); print Dumper($result); }; if ($@) { @@ -46,7 +46,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **body** | [**Client**](Client.md)| client model | + **client** | [**Client**](Client.md)| client model | ### Return type diff --git a/samples/client/petstore/perl/docs/FormatTest.md b/samples/client/petstore/perl/docs/FormatTest.md index f58434c19f4..7cfabebb281 100644 --- a/samples/client/petstore/perl/docs/FormatTest.md +++ b/samples/client/petstore/perl/docs/FormatTest.md @@ -21,7 +21,8 @@ Name | Type | Description | Notes **date_time** | **DateTime** | | [optional] **uuid** | **string** | | [optional] **password** | **string** | | -**big_decimal** | [**BigDecimal**](BigDecimal.md) | | [optional] +**pattern_with_digits** | **string** | A string that is a 10 digit number. Can have leading zeros. | [optional] +**pattern_with_digits_and_delimiter** | **string** | A string starting with 'image_' (case insensitive) and one to three digits following i.e. Image_01. | [optional] [[Back to Model list]](../README.md#documentation-for-models) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to README]](../README.md) diff --git a/samples/client/petstore/perl/docs/PetApi.md b/samples/client/petstore/perl/docs/PetApi.md index 899e2f63e07..5218d9282f1 100644 --- a/samples/client/petstore/perl/docs/PetApi.md +++ b/samples/client/petstore/perl/docs/PetApi.md @@ -21,7 +21,7 @@ Method | HTTP request | Description # **add_pet** -> add_pet(body => $body) +> add_pet(pet => $pet) Add a new pet to the store @@ -35,10 +35,10 @@ my $api_instance = WWW::OpenAPIClient::PetApi->new( access_token => 'YOUR_ACCESS_TOKEN', ); -my $body = WWW::OpenAPIClient::Object::Pet->new(); # Pet | Pet object that needs to be added to the store +my $pet = WWW::OpenAPIClient::Object::Pet->new(); # Pet | Pet object that needs to be added to the store eval { - $api_instance->add_pet(body => $body); + $api_instance->add_pet(pet => $pet); }; if ($@) { warn "Exception when calling PetApi->add_pet: $@\n"; @@ -49,7 +49,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **body** | [**Pet**](Pet.md)| Pet object that needs to be added to the store | + **pet** | [**Pet**](Pet.md)| Pet object that needs to be added to the store | ### Return type @@ -264,7 +264,7 @@ Name | Type | Description | Notes [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) # **update_pet** -> update_pet(body => $body) +> update_pet(pet => $pet) Update an existing pet @@ -278,10 +278,10 @@ my $api_instance = WWW::OpenAPIClient::PetApi->new( access_token => 'YOUR_ACCESS_TOKEN', ); -my $body = WWW::OpenAPIClient::Object::Pet->new(); # Pet | Pet object that needs to be added to the store +my $pet = WWW::OpenAPIClient::Object::Pet->new(); # Pet | Pet object that needs to be added to the store eval { - $api_instance->update_pet(body => $body); + $api_instance->update_pet(pet => $pet); }; if ($@) { warn "Exception when calling PetApi->update_pet: $@\n"; @@ -292,7 +292,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **body** | [**Pet**](Pet.md)| Pet object that needs to be added to the store | + **pet** | [**Pet**](Pet.md)| Pet object that needs to be added to the store | ### Return type diff --git a/samples/client/petstore/perl/docs/StoreApi.md b/samples/client/petstore/perl/docs/StoreApi.md index fe591e701a8..e467823c53a 100644 --- a/samples/client/petstore/perl/docs/StoreApi.md +++ b/samples/client/petstore/perl/docs/StoreApi.md @@ -154,7 +154,7 @@ No authorization required [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) # **place_order** -> Order place_order(body => $body) +> Order place_order(order => $order) Place an order for a pet @@ -165,10 +165,10 @@ use WWW::OpenAPIClient::StoreApi; my $api_instance = WWW::OpenAPIClient::StoreApi->new( ); -my $body = WWW::OpenAPIClient::Object::Order->new(); # Order | order placed for purchasing the pet +my $order = WWW::OpenAPIClient::Object::Order->new(); # Order | order placed for purchasing the pet eval { - my $result = $api_instance->place_order(body => $body); + my $result = $api_instance->place_order(order => $order); print Dumper($result); }; if ($@) { @@ -180,7 +180,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **body** | [**Order**](Order.md)| order placed for purchasing the pet | + **order** | [**Order**](Order.md)| order placed for purchasing the pet | ### Return type @@ -192,7 +192,7 @@ No authorization required ### HTTP request headers - - **Content-Type**: Not defined + - **Content-Type**: application/json - **Accept**: application/xml, application/json [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) diff --git a/samples/client/petstore/perl/docs/UserApi.md b/samples/client/petstore/perl/docs/UserApi.md index 543f18109c7..3ab7ae9e406 100644 --- a/samples/client/petstore/perl/docs/UserApi.md +++ b/samples/client/petstore/perl/docs/UserApi.md @@ -20,7 +20,7 @@ Method | HTTP request | Description # **create_user** -> create_user(body => $body) +> create_user(user => $user) Create user @@ -33,10 +33,10 @@ use WWW::OpenAPIClient::UserApi; my $api_instance = WWW::OpenAPIClient::UserApi->new( ); -my $body = WWW::OpenAPIClient::Object::User->new(); # User | Created user object +my $user = WWW::OpenAPIClient::Object::User->new(); # User | Created user object eval { - $api_instance->create_user(body => $body); + $api_instance->create_user(user => $user); }; if ($@) { warn "Exception when calling UserApi->create_user: $@\n"; @@ -47,7 +47,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **body** | [**User**](User.md)| Created user object | + **user** | [**User**](User.md)| Created user object | ### Return type @@ -59,13 +59,13 @@ No authorization required ### HTTP request headers - - **Content-Type**: Not defined + - **Content-Type**: application/json - **Accept**: Not defined [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) # **create_users_with_array_input** -> create_users_with_array_input(body => $body) +> create_users_with_array_input(user => $user) Creates list of users with given input array @@ -76,10 +76,10 @@ use WWW::OpenAPIClient::UserApi; my $api_instance = WWW::OpenAPIClient::UserApi->new( ); -my $body = [WWW::OpenAPIClient::Object::ARRAY[User]->new()]; # ARRAY[User] | List of user object +my $user = [WWW::OpenAPIClient::Object::ARRAY[User]->new()]; # ARRAY[User] | List of user object eval { - $api_instance->create_users_with_array_input(body => $body); + $api_instance->create_users_with_array_input(user => $user); }; if ($@) { warn "Exception when calling UserApi->create_users_with_array_input: $@\n"; @@ -90,7 +90,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **body** | [**ARRAY[User]**](User.md)| List of user object | + **user** | [**ARRAY[User]**](User.md)| List of user object | ### Return type @@ -102,13 +102,13 @@ No authorization required ### HTTP request headers - - **Content-Type**: Not defined + - **Content-Type**: application/json - **Accept**: Not defined [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) # **create_users_with_list_input** -> create_users_with_list_input(body => $body) +> create_users_with_list_input(user => $user) Creates list of users with given input array @@ -119,10 +119,10 @@ use WWW::OpenAPIClient::UserApi; my $api_instance = WWW::OpenAPIClient::UserApi->new( ); -my $body = [WWW::OpenAPIClient::Object::ARRAY[User]->new()]; # ARRAY[User] | List of user object +my $user = [WWW::OpenAPIClient::Object::ARRAY[User]->new()]; # ARRAY[User] | List of user object eval { - $api_instance->create_users_with_list_input(body => $body); + $api_instance->create_users_with_list_input(user => $user); }; if ($@) { warn "Exception when calling UserApi->create_users_with_list_input: $@\n"; @@ -133,7 +133,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- - **body** | [**ARRAY[User]**](User.md)| List of user object | + **user** | [**ARRAY[User]**](User.md)| List of user object | ### Return type @@ -145,7 +145,7 @@ No authorization required ### HTTP request headers - - **Content-Type**: Not defined + - **Content-Type**: application/json - **Accept**: Not defined [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) @@ -325,7 +325,7 @@ No authorization required [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) # **update_user** -> update_user(username => $username, body => $body) +> update_user(username => $username, user => $user) Updated user @@ -339,10 +339,10 @@ my $api_instance = WWW::OpenAPIClient::UserApi->new( ); my $username = "username_example"; # string | name that need to be deleted -my $body = WWW::OpenAPIClient::Object::User->new(); # User | Updated user object +my $user = WWW::OpenAPIClient::Object::User->new(); # User | Updated user object eval { - $api_instance->update_user(username => $username, body => $body); + $api_instance->update_user(username => $username, user => $user); }; if ($@) { warn "Exception when calling UserApi->update_user: $@\n"; @@ -354,7 +354,7 @@ if ($@) { Name | Type | Description | Notes ------------- | ------------- | ------------- | ------------- **username** | **string**| name that need to be deleted | - **body** | [**User**](User.md)| Updated user object | + **user** | [**User**](User.md)| Updated user object | ### Return type @@ -366,7 +366,7 @@ No authorization required ### HTTP request headers - - **Content-Type**: Not defined + - **Content-Type**: application/json - **Accept**: Not defined [[Back to top]](#) [[Back to API list]](../README.md#documentation-for-api-endpoints) [[Back to Model list]](../README.md#documentation-for-models) [[Back to README]](../README.md) diff --git a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/AnotherFakeApi.pm b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/AnotherFakeApi.pm index e389921bd42..cd1df44004d 100644 --- a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/AnotherFakeApi.pm +++ b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/AnotherFakeApi.pm @@ -53,10 +53,10 @@ sub new { # # To test special tags # -# @param Client $body client model (required) +# @param Client $client client model (required) { my $params = { - 'body' => { + 'client' => { data_type => 'Client', description => 'client model', required => '1', @@ -73,9 +73,9 @@ sub new { sub call_123_test_special_tags { my ($self, %args) = @_; - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling call_123_test_special_tags"); + # verify the required parameter 'client' is set + unless (exists $args{'client'}) { + croak("Missing the required parameter 'client' when calling call_123_test_special_tags"); } # parse inputs @@ -95,8 +95,8 @@ sub call_123_test_special_tags { my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'client'}) { + $_body_data = $args{'client'}; } # authentication setting, if any diff --git a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/ApiClient.pm b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/ApiClient.pm index f99f06bd87d..0d6852ecedc 100644 --- a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/ApiClient.pm +++ b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/ApiClient.pm @@ -348,11 +348,19 @@ sub update_params_for_auth { $query_params->{'api_key_query'} = $api_key; } } + elsif ($auth eq 'bearer_test') { + # this endpoint requires Bearer (JWT) authentication (access token) + if ($self->{config}{access_token}) { + $header_params->{'Authorization'} = 'Bearer ' . $self->{config}{access_token}; + } + } elsif ($auth eq 'http_basic_test') { if ($self->{config}{username} || $self->{config}{password}) { $header_params->{'Authorization'} = 'Basic ' . encode_base64($self->{config}{username} . ":" . $self->{config}{password}); } } + elsif ($auth eq 'http_signature_test') { + } elsif ($auth eq 'petstore_auth') { if ($self->{config}{access_token}) { $header_params->{'Authorization'} = 'Bearer ' . $self->{config}{access_token}; diff --git a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/FakeApi.pm b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/FakeApi.pm index 89e0e9b93ca..4debb5412ca 100644 --- a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/FakeApi.pm +++ b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/FakeApi.pm @@ -49,39 +49,100 @@ sub new { # -# create_xml_item +# fake_health_get # -# creates an XmlItem +# Health check endpoint # -# @param XmlItem $xml_item XmlItem Body (required) { my $params = { - 'xml_item' => { - data_type => 'XmlItem', - description => 'XmlItem Body', + }; + __PACKAGE__->method_documentation->{ 'fake_health_get' } = { + summary => 'Health check endpoint', + params => $params, + returns => 'HealthCheckResult', + }; +} +# @return HealthCheckResult +# +sub fake_health_get { + my ($self, %args) = @_; + + # parse inputs + my $_resource_path = '/fake/health'; + + my $_method = 'GET'; + my $query_params = {}; + my $header_params = {}; + my $form_params = {}; + + # 'Accept' and 'Content-Type' header + my $_header_accept = $self->{api_client}->select_header_accept('application/json'); + if ($_header_accept) { + $header_params->{'Accept'} = $_header_accept; + } + $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type(); + + my $_body_data; + # authentication setting, if any + my $auth_settings = [qw()]; + + # make the API Call + my $response = $self->{api_client}->call_api($_resource_path, $_method, + $query_params, $form_params, + $header_params, $_body_data, $auth_settings); + if (!$response) { + return; + } + my $_response_object = $self->{api_client}->deserialize('HealthCheckResult', $response); + return $_response_object; +} + +# +# fake_http_signature_test +# +# test http signature authentication +# +# @param Pet $pet Pet object that needs to be added to the store (required) +# @param string $query_1 query parameter (optional) +# @param string $header_1 header parameter (optional) +{ + my $params = { + 'pet' => { + data_type => 'Pet', + description => 'Pet object that needs to be added to the store', required => '1', }, + 'query_1' => { + data_type => 'string', + description => 'query parameter', + required => '0', + }, + 'header_1' => { + data_type => 'string', + description => 'header parameter', + required => '0', + }, }; - __PACKAGE__->method_documentation->{ 'create_xml_item' } = { - summary => 'creates an XmlItem', + __PACKAGE__->method_documentation->{ 'fake_http_signature_test' } = { + summary => 'test http signature authentication', params => $params, returns => undef, }; } # @return void # -sub create_xml_item { +sub fake_http_signature_test { my ($self, %args) = @_; - # verify the required parameter 'xml_item' is set - unless (exists $args{'xml_item'}) { - croak("Missing the required parameter 'xml_item' when calling create_xml_item"); + # verify the required parameter 'pet' is set + unless (exists $args{'pet'}) { + croak("Missing the required parameter 'pet' when calling fake_http_signature_test"); } # parse inputs - my $_resource_path = '/fake/create_xml_item'; + my $_resource_path = '/fake/http-signature-test'; - my $_method = 'POST'; + my $_method = 'GET'; my $query_params = {}; my $header_params = {}; my $form_params = {}; @@ -91,16 +152,26 @@ sub create_xml_item { if ($_header_accept) { $header_params->{'Accept'} = $_header_accept; } - $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/xml', 'application/xml; charset=utf-8', 'application/xml; charset=utf-16', 'text/xml', 'text/xml; charset=utf-8', 'text/xml; charset=utf-16'); + $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json', 'application/xml'); + + # query params + if ( exists $args{'query_1'}) { + $query_params->{'query_1'} = $self->{api_client}->to_query_value($args{'query_1'}); + } + + # header params + if ( exists $args{'header_1'}) { + $header_params->{'header_1'} = $self->{api_client}->to_header_value($args{'header_1'}); + } my $_body_data; # body params - if ( exists $args{'xml_item'}) { - $_body_data = $args{'xml_item'}; + if ( exists $args{'pet'}) { + $_body_data = $args{'pet'}; } # authentication setting, if any - my $auth_settings = [qw()]; + my $auth_settings = [qw(http_signature_test )]; # make the API Call $self->{api_client}->call_api($_resource_path, $_method, @@ -147,7 +218,7 @@ sub fake_outer_boolean_serialize { if ($_header_accept) { $header_params->{'Accept'} = $_header_accept; } - $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type(); + $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); my $_body_data; # body params @@ -174,10 +245,10 @@ sub fake_outer_boolean_serialize { # # # -# @param OuterComposite $body Input composite as post body (optional) +# @param OuterComposite $outer_composite Input composite as post body (optional) { my $params = { - 'body' => { + 'outer_composite' => { data_type => 'OuterComposite', description => 'Input composite as post body', required => '0', @@ -207,12 +278,12 @@ sub fake_outer_composite_serialize { if ($_header_accept) { $header_params->{'Accept'} = $_header_accept; } - $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type(); + $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'outer_composite'}) { + $_body_data = $args{'outer_composite'}; } # authentication setting, if any @@ -267,7 +338,7 @@ sub fake_outer_number_serialize { if ($_header_accept) { $header_params->{'Accept'} = $_header_accept; } - $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type(); + $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); my $_body_data; # body params @@ -327,7 +398,7 @@ sub fake_outer_string_serialize { if ($_header_accept) { $header_params->{'Accept'} = $_header_accept; } - $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type(); + $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); my $_body_data; # body params @@ -354,10 +425,10 @@ sub fake_outer_string_serialize { # # # -# @param FileSchemaTestClass $body (required) +# @param FileSchemaTestClass $file_schema_test_class (required) { my $params = { - 'body' => { + 'file_schema_test_class' => { data_type => 'FileSchemaTestClass', description => '', required => '1', @@ -374,9 +445,9 @@ sub fake_outer_string_serialize { sub test_body_with_file_schema { my ($self, %args) = @_; - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling test_body_with_file_schema"); + # verify the required parameter 'file_schema_test_class' is set + unless (exists $args{'file_schema_test_class'}) { + croak("Missing the required parameter 'file_schema_test_class' when calling test_body_with_file_schema"); } # parse inputs @@ -396,8 +467,8 @@ sub test_body_with_file_schema { my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'file_schema_test_class'}) { + $_body_data = $args{'file_schema_test_class'}; } # authentication setting, if any @@ -416,7 +487,7 @@ sub test_body_with_file_schema { # # # @param string $query (required) -# @param User $body (required) +# @param User $user (required) { my $params = { 'query' => { @@ -424,7 +495,7 @@ sub test_body_with_file_schema { description => '', required => '1', }, - 'body' => { + 'user' => { data_type => 'User', description => '', required => '1', @@ -446,9 +517,9 @@ sub test_body_with_query_params { croak("Missing the required parameter 'query' when calling test_body_with_query_params"); } - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling test_body_with_query_params"); + # verify the required parameter 'user' is set + unless (exists $args{'user'}) { + croak("Missing the required parameter 'user' when calling test_body_with_query_params"); } # parse inputs @@ -473,8 +544,8 @@ sub test_body_with_query_params { my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'user'}) { + $_body_data = $args{'user'}; } # authentication setting, if any @@ -492,10 +563,10 @@ sub test_body_with_query_params { # # To test \"client\" model # -# @param Client $body client model (required) +# @param Client $client client model (required) { my $params = { - 'body' => { + 'client' => { data_type => 'Client', description => 'client model', required => '1', @@ -512,9 +583,9 @@ sub test_body_with_query_params { sub test_client_model { my ($self, %args) = @_; - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling test_client_model"); + # verify the required parameter 'client' is set + unless (exists $args{'client'}) { + croak("Missing the required parameter 'client' when calling test_client_model"); } # parse inputs @@ -534,8 +605,8 @@ sub test_client_model { my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'client'}) { + $_body_data = $args{'client'}; } # authentication setting, if any @@ -555,7 +626,7 @@ sub test_client_model { # # test_endpoint_parameters # -# Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 +# Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 # # @param double $number None (required) # @param double $double None (required) @@ -645,7 +716,7 @@ sub test_client_model { }, }; __PACKAGE__->method_documentation->{ 'test_endpoint_parameters' } = { - summary => 'Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트', + summary => 'Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 ', params => $params, returns => undef, }; @@ -1022,7 +1093,7 @@ sub test_group_parameters { my $_body_data; # authentication setting, if any - my $auth_settings = [qw()]; + my $auth_settings = [qw(bearer_test )]; # make the API Call $self->{api_client}->call_api($_resource_path, $_method, @@ -1036,10 +1107,10 @@ sub test_group_parameters { # # test inline additionalProperties # -# @param HASH[string,string] $param request body (required) +# @param HASH[string,string] $request_body request body (required) { my $params = { - 'param' => { + 'request_body' => { data_type => 'HASH[string,string]', description => 'request body', required => '1', @@ -1056,9 +1127,9 @@ sub test_group_parameters { sub test_inline_additional_properties { my ($self, %args) = @_; - # verify the required parameter 'param' is set - unless (exists $args{'param'}) { - croak("Missing the required parameter 'param' when calling test_inline_additional_properties"); + # verify the required parameter 'request_body' is set + unless (exists $args{'request_body'}) { + croak("Missing the required parameter 'request_body' when calling test_inline_additional_properties"); } # parse inputs @@ -1078,8 +1149,8 @@ sub test_inline_additional_properties { my $_body_data; # body params - if ( exists $args{'param'}) { - $_body_data = $args{'param'}; + if ( exists $args{'request_body'}) { + $_body_data = $args{'request_body'}; } # authentication setting, if any diff --git a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/FakeClassnameTags123Api.pm b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/FakeClassnameTags123Api.pm index f57d72428c9..c521d2c5758 100644 --- a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/FakeClassnameTags123Api.pm +++ b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/FakeClassnameTags123Api.pm @@ -53,10 +53,10 @@ sub new { # # To test class name in snake case # -# @param Client $body client model (required) +# @param Client $client client model (required) { my $params = { - 'body' => { + 'client' => { data_type => 'Client', description => 'client model', required => '1', @@ -73,9 +73,9 @@ sub new { sub test_classname { my ($self, %args) = @_; - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling test_classname"); + # verify the required parameter 'client' is set + unless (exists $args{'client'}) { + croak("Missing the required parameter 'client' when calling test_classname"); } # parse inputs @@ -95,8 +95,8 @@ sub test_classname { my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'client'}) { + $_body_data = $args{'client'}; } # authentication setting, if any diff --git a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/AdditionalPropertiesClass.pm b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/AdditionalPropertiesClass.pm index f388c3a4d1d..3bbbceeb84b 100644 --- a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/AdditionalPropertiesClass.pm +++ b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/AdditionalPropertiesClass.pm @@ -161,79 +161,16 @@ __PACKAGE__->class_documentation({description => '', } ); __PACKAGE__->method_documentation({ - 'map_string' => { + 'map_property' => { datatype => 'HASH[string,string]', - base_name => 'map_string', + base_name => 'map_property', description => '', format => '', read_only => '', }, - 'map_number' => { - datatype => 'HASH[string,double]', - base_name => 'map_number', - description => '', - format => '', - read_only => '', - }, - 'map_integer' => { - datatype => 'HASH[string,int]', - base_name => 'map_integer', - description => '', - format => '', - read_only => '', - }, - 'map_boolean' => { - datatype => 'HASH[string,boolean]', - base_name => 'map_boolean', - description => '', - format => '', - read_only => '', - }, - 'map_array_integer' => { - datatype => 'HASH[string,ARRAY[int]]', - base_name => 'map_array_integer', - description => '', - format => '', - read_only => '', - }, - 'map_array_anytype' => { - datatype => 'HASH[string,ARRAY[object]]', - base_name => 'map_array_anytype', - description => '', - format => '', - read_only => '', - }, - 'map_map_string' => { + 'map_of_map_property' => { datatype => 'HASH[string,HASH[string,string]]', - base_name => 'map_map_string', - description => '', - format => '', - read_only => '', - }, - 'map_map_anytype' => { - datatype => 'HASH[string,HASH[string,object]]', - base_name => 'map_map_anytype', - description => '', - format => '', - read_only => '', - }, - 'anytype_1' => { - datatype => 'object', - base_name => 'anytype_1', - description => '', - format => '', - read_only => '', - }, - 'anytype_2' => { - datatype => 'object', - base_name => 'anytype_2', - description => '', - format => '', - read_only => '', - }, - 'anytype_3' => { - datatype => 'object', - base_name => 'anytype_3', + base_name => 'map_of_map_property', description => '', format => '', read_only => '', @@ -241,31 +178,13 @@ __PACKAGE__->method_documentation({ }); __PACKAGE__->openapi_types( { - 'map_string' => 'HASH[string,string]', - 'map_number' => 'HASH[string,double]', - 'map_integer' => 'HASH[string,int]', - 'map_boolean' => 'HASH[string,boolean]', - 'map_array_integer' => 'HASH[string,ARRAY[int]]', - 'map_array_anytype' => 'HASH[string,ARRAY[object]]', - 'map_map_string' => 'HASH[string,HASH[string,string]]', - 'map_map_anytype' => 'HASH[string,HASH[string,object]]', - 'anytype_1' => 'object', - 'anytype_2' => 'object', - 'anytype_3' => 'object' + 'map_property' => 'HASH[string,string]', + 'map_of_map_property' => 'HASH[string,HASH[string,string]]' } ); __PACKAGE__->attribute_map( { - 'map_string' => 'map_string', - 'map_number' => 'map_number', - 'map_integer' => 'map_integer', - 'map_boolean' => 'map_boolean', - 'map_array_integer' => 'map_array_integer', - 'map_array_anytype' => 'map_array_anytype', - 'map_map_string' => 'map_map_string', - 'map_map_anytype' => 'map_map_anytype', - 'anytype_1' => 'anytype_1', - 'anytype_2' => 'anytype_2', - 'anytype_3' => 'anytype_3' + 'map_property' => 'map_property', + 'map_of_map_property' => 'map_of_map_property' } ); __PACKAGE__->mk_accessors(keys %{__PACKAGE__->attribute_map}); diff --git a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/EnumTest.pm b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/EnumTest.pm index 34585dee384..a563f72d70e 100644 --- a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/EnumTest.pm +++ b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/EnumTest.pm @@ -31,6 +31,9 @@ use Date::Parse; use DateTime; use WWW::OpenAPIClient::Object::OuterEnum; +use WWW::OpenAPIClient::Object::OuterEnumDefaultValue; +use WWW::OpenAPIClient::Object::OuterEnumInteger; +use WWW::OpenAPIClient::Object::OuterEnumIntegerDefaultValue; use base ("Class::Accessor", "Class::Data::Inheritable"); @@ -197,6 +200,27 @@ __PACKAGE__->method_documentation({ format => '', read_only => '', }, + 'outer_enum_integer' => { + datatype => 'OuterEnumInteger', + base_name => 'outerEnumInteger', + description => '', + format => '', + read_only => '', + }, + 'outer_enum_default_value' => { + datatype => 'OuterEnumDefaultValue', + base_name => 'outerEnumDefaultValue', + description => '', + format => '', + read_only => '', + }, + 'outer_enum_integer_default_value' => { + datatype => 'OuterEnumIntegerDefaultValue', + base_name => 'outerEnumIntegerDefaultValue', + description => '', + format => '', + read_only => '', + }, }); __PACKAGE__->openapi_types( { @@ -204,7 +228,10 @@ __PACKAGE__->openapi_types( { 'enum_string_required' => 'string', 'enum_integer' => 'int', 'enum_number' => 'double', - 'outer_enum' => 'OuterEnum' + 'outer_enum' => 'OuterEnum', + 'outer_enum_integer' => 'OuterEnumInteger', + 'outer_enum_default_value' => 'OuterEnumDefaultValue', + 'outer_enum_integer_default_value' => 'OuterEnumIntegerDefaultValue' } ); __PACKAGE__->attribute_map( { @@ -212,7 +239,10 @@ __PACKAGE__->attribute_map( { 'enum_string_required' => 'enum_string_required', 'enum_integer' => 'enum_integer', 'enum_number' => 'enum_number', - 'outer_enum' => 'outerEnum' + 'outer_enum' => 'outerEnum', + 'outer_enum_integer' => 'outerEnumInteger', + 'outer_enum_default_value' => 'outerEnumDefaultValue', + 'outer_enum_integer_default_value' => 'outerEnumIntegerDefaultValue' } ); __PACKAGE__->mk_accessors(keys %{__PACKAGE__->attribute_map}); diff --git a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/FormatTest.pm b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/FormatTest.pm index 64c92268370..b3c1defbd7e 100644 --- a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/FormatTest.pm +++ b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/Object/FormatTest.pm @@ -30,7 +30,6 @@ use Log::Any qw($log); use Date::Parse; use DateTime; -use WWW::OpenAPIClient::Object::BigDecimal; use base ("Class::Accessor", "Class::Data::Inheritable"); @@ -253,10 +252,17 @@ __PACKAGE__->method_documentation({ format => '', read_only => '', }, - 'big_decimal' => { - datatype => 'BigDecimal', - base_name => 'BigDecimal', - description => '', + 'pattern_with_digits' => { + datatype => 'string', + base_name => 'pattern_with_digits', + description => 'A string that is a 10 digit number. Can have leading zeros.', + format => '', + read_only => '', + }, + 'pattern_with_digits_and_delimiter' => { + datatype => 'string', + base_name => 'pattern_with_digits_and_delimiter', + description => 'A string starting with 'image_' (case insensitive) and one to three digits following i.e. Image_01.', format => '', read_only => '', }, @@ -276,7 +282,8 @@ __PACKAGE__->openapi_types( { 'date_time' => 'DateTime', 'uuid' => 'string', 'password' => 'string', - 'big_decimal' => 'BigDecimal' + 'pattern_with_digits' => 'string', + 'pattern_with_digits_and_delimiter' => 'string' } ); __PACKAGE__->attribute_map( { @@ -293,7 +300,8 @@ __PACKAGE__->attribute_map( { 'date_time' => 'dateTime', 'uuid' => 'uuid', 'password' => 'password', - 'big_decimal' => 'BigDecimal' + 'pattern_with_digits' => 'pattern_with_digits', + 'pattern_with_digits_and_delimiter' => 'pattern_with_digits_and_delimiter' } ); __PACKAGE__->mk_accessors(keys %{__PACKAGE__->attribute_map}); diff --git a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/PetApi.pm b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/PetApi.pm index 70d56989012..f55d7b63834 100644 --- a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/PetApi.pm +++ b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/PetApi.pm @@ -53,10 +53,10 @@ sub new { # # Add a new pet to the store # -# @param Pet $body Pet object that needs to be added to the store (required) +# @param Pet $pet Pet object that needs to be added to the store (required) { my $params = { - 'body' => { + 'pet' => { data_type => 'Pet', description => 'Pet object that needs to be added to the store', required => '1', @@ -73,9 +73,9 @@ sub new { sub add_pet { my ($self, %args) = @_; - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling add_pet"); + # verify the required parameter 'pet' is set + unless (exists $args{'pet'}) { + croak("Missing the required parameter 'pet' when calling add_pet"); } # parse inputs @@ -95,8 +95,8 @@ sub add_pet { my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'pet'}) { + $_body_data = $args{'pet'}; } # authentication setting, if any @@ -385,10 +385,10 @@ sub get_pet_by_id { # # Update an existing pet # -# @param Pet $body Pet object that needs to be added to the store (required) +# @param Pet $pet Pet object that needs to be added to the store (required) { my $params = { - 'body' => { + 'pet' => { data_type => 'Pet', description => 'Pet object that needs to be added to the store', required => '1', @@ -405,9 +405,9 @@ sub get_pet_by_id { sub update_pet { my ($self, %args) = @_; - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling update_pet"); + # verify the required parameter 'pet' is set + unless (exists $args{'pet'}) { + croak("Missing the required parameter 'pet' when calling update_pet"); } # parse inputs @@ -427,8 +427,8 @@ sub update_pet { my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'pet'}) { + $_body_data = $args{'pet'}; } # authentication setting, if any diff --git a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/StoreApi.pm b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/StoreApi.pm index cfd4a0a29fc..3b87d3d8f73 100644 --- a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/StoreApi.pm +++ b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/StoreApi.pm @@ -232,10 +232,10 @@ sub get_order_by_id { # # Place an order for a pet # -# @param Order $body order placed for purchasing the pet (required) +# @param Order $order order placed for purchasing the pet (required) { my $params = { - 'body' => { + 'order' => { data_type => 'Order', description => 'order placed for purchasing the pet', required => '1', @@ -252,9 +252,9 @@ sub get_order_by_id { sub place_order { my ($self, %args) = @_; - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling place_order"); + # verify the required parameter 'order' is set + unless (exists $args{'order'}) { + croak("Missing the required parameter 'order' when calling place_order"); } # parse inputs @@ -270,12 +270,12 @@ sub place_order { if ($_header_accept) { $header_params->{'Accept'} = $_header_accept; } - $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type(); + $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'order'}) { + $_body_data = $args{'order'}; } # authentication setting, if any diff --git a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/UserApi.pm b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/UserApi.pm index 3d3dfab9c7d..15bb4b97a3c 100644 --- a/samples/client/petstore/perl/lib/WWW/OpenAPIClient/UserApi.pm +++ b/samples/client/petstore/perl/lib/WWW/OpenAPIClient/UserApi.pm @@ -53,10 +53,10 @@ sub new { # # Create user # -# @param User $body Created user object (required) +# @param User $user Created user object (required) { my $params = { - 'body' => { + 'user' => { data_type => 'User', description => 'Created user object', required => '1', @@ -73,9 +73,9 @@ sub new { sub create_user { my ($self, %args) = @_; - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling create_user"); + # verify the required parameter 'user' is set + unless (exists $args{'user'}) { + croak("Missing the required parameter 'user' when calling create_user"); } # parse inputs @@ -91,12 +91,12 @@ sub create_user { if ($_header_accept) { $header_params->{'Accept'} = $_header_accept; } - $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type(); + $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'user'}) { + $_body_data = $args{'user'}; } # authentication setting, if any @@ -114,10 +114,10 @@ sub create_user { # # Creates list of users with given input array # -# @param ARRAY[User] $body List of user object (required) +# @param ARRAY[User] $user List of user object (required) { my $params = { - 'body' => { + 'user' => { data_type => 'ARRAY[User]', description => 'List of user object', required => '1', @@ -134,9 +134,9 @@ sub create_user { sub create_users_with_array_input { my ($self, %args) = @_; - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling create_users_with_array_input"); + # verify the required parameter 'user' is set + unless (exists $args{'user'}) { + croak("Missing the required parameter 'user' when calling create_users_with_array_input"); } # parse inputs @@ -152,12 +152,12 @@ sub create_users_with_array_input { if ($_header_accept) { $header_params->{'Accept'} = $_header_accept; } - $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type(); + $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'user'}) { + $_body_data = $args{'user'}; } # authentication setting, if any @@ -175,10 +175,10 @@ sub create_users_with_array_input { # # Creates list of users with given input array # -# @param ARRAY[User] $body List of user object (required) +# @param ARRAY[User] $user List of user object (required) { my $params = { - 'body' => { + 'user' => { data_type => 'ARRAY[User]', description => 'List of user object', required => '1', @@ -195,9 +195,9 @@ sub create_users_with_array_input { sub create_users_with_list_input { my ($self, %args) = @_; - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling create_users_with_list_input"); + # verify the required parameter 'user' is set + unless (exists $args{'user'}) { + croak("Missing the required parameter 'user' when calling create_users_with_list_input"); } # parse inputs @@ -213,12 +213,12 @@ sub create_users_with_list_input { if ($_header_accept) { $header_params->{'Accept'} = $_header_accept; } - $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type(); + $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'user'}) { + $_body_data = $args{'user'}; } # authentication setting, if any @@ -493,7 +493,7 @@ sub logout_user { # Updated user # # @param string $username name that need to be deleted (required) -# @param User $body Updated user object (required) +# @param User $user Updated user object (required) { my $params = { 'username' => { @@ -501,7 +501,7 @@ sub logout_user { description => 'name that need to be deleted', required => '1', }, - 'body' => { + 'user' => { data_type => 'User', description => 'Updated user object', required => '1', @@ -523,9 +523,9 @@ sub update_user { croak("Missing the required parameter 'username' when calling update_user"); } - # verify the required parameter 'body' is set - unless (exists $args{'body'}) { - croak("Missing the required parameter 'body' when calling update_user"); + # verify the required parameter 'user' is set + unless (exists $args{'user'}) { + croak("Missing the required parameter 'user' when calling update_user"); } # parse inputs @@ -541,7 +541,7 @@ sub update_user { if ($_header_accept) { $header_params->{'Accept'} = $_header_accept; } - $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type(); + $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); # path params if ( exists $args{'username'}) { @@ -552,8 +552,8 @@ sub update_user { my $_body_data; # body params - if ( exists $args{'body'}) { - $_body_data = $args{'body'}; + if ( exists $args{'user'}) { + $_body_data = $args{'user'}; } # authentication setting, if any diff --git a/samples/client/petstore/perl/tests/01_pet_api.t b/samples/client/petstore/perl/tests/01_pet_api.t index 4e23d50895a..e9647a96a39 100644 --- a/samples/client/petstore/perl/tests/01_pet_api.t +++ b/samples/client/petstore/perl/tests/01_pet_api.t @@ -50,7 +50,7 @@ is $pet_hash->{category}->{name}, 'perl', 'get the proper category name'; is $pet_hash->{tags}[0]->{name}, 'just kidding', 'get the proper tag name'; is $pet_hash->{tags}[0]->{id}, '11', 'get the proper tag id'; -my $add_pet = $api->add_pet(body => $pet); +my $add_pet = $api->add_pet(pet => $pet); my $get_pet = $api->get_pet_by_id(pet_id => $pet_id); my $get_pet_hash = $get_pet->to_hash; diff --git a/samples/client/petstore/perl/tests/03_api_factory.t b/samples/client/petstore/perl/tests/03_api_factory.t index f7b4d6beeb5..ac6f7f0085d 100644 --- a/samples/client/petstore/perl/tests/03_api_factory.t +++ b/samples/client/petstore/perl/tests/03_api_factory.t @@ -37,7 +37,7 @@ is $pet->tags->[0]->name, 'just kidding', 'got the proper tag name'; is $pet->tags->[0]->id, '11', 'got the proper tag id'; -my $add_pet = $pet_api->add_pet(body => $pet); +my $add_pet = $pet_api->add_pet(pet => $pet); my $get_pet = $pet_api->get_pet_by_id(pet_id => $pet_id); is $get_pet->id, '10008', 'stored and retrieved: got the proper pet id'; diff --git a/samples/client/petstore/perl/tests/04_role.t b/samples/client/petstore/perl/tests/04_role.t index 5206a498fd3..6cd994dd5b3 100644 --- a/samples/client/petstore/perl/tests/04_role.t +++ b/samples/client/petstore/perl/tests/04_role.t @@ -36,7 +36,7 @@ is $pet->tags->[0]->name, 'just kidding', 'got the proper tag name'; is $pet->tags->[0]->id, '11', 'got the proper tag id'; -my $add_pet = $api->add_pet(body => $pet); +my $add_pet = $api->add_pet(pet => $pet); my $get_pet = $api->get_pet_by_id(pet_id => $pet_id); is $get_pet->id, '10008', 'stored and retrieved: got the proper pet id';