javonet-nodejs-sdk 2.0.1 → 2.0.5

package/Binaries/Perl/Linux/X64/lib/Javonet/Core/Handler/PerlHandler.pm

@@ -23,11 +23,10 @@ use aliased 'Javonet::Core::Handler::AbstractHandler' => 'AbstractHandler';
 use aliased 'Javonet::Sdk::Core::RuntimeLib' => 'RuntimeLib', qw(get_runtime);
 use aliased 'Javonet::Core::Handler::HandlerDictionary' => 'HandlerDictionary', qw(get_handler);
 
-
 my $load_library_handler = LoadLibraryHandler->new();
 my $get_static_field_handler = GetStaticFieldHandler->new();
-my $set_static_field_handler= SetStaticFieldHandler->new();
-my $create_instance_handler= CreateInstanceHandler->new();
+my $set_static_field_handler = SetStaticFieldHandler->new();
+my $create_instance_handler = CreateInstanceHandler->new();
 my $invoke_instance_method_handler = InvokeInstanceMethodHandler->new();
 my $invoke_static_method_handler = InvokeStaticMethodHandler->new();
 my $resolve_instance_handler = ResolveInstanceHandler->new();
@@ -36,7 +35,6 @@ my $casting_handler = CastingHandler->new();
 my $get_instance_field_handler = GetInstanceFieldHandler->new();
 my $destruct_reference_handler = DestructReferenceHandler->new();
 
-
 Javonet::Core::Handler::HandlerDictionary::add_handler_to_dict(
     Javonet::Sdk::Core::PerlCommandType::get_command_type('LoadLibrary'),
     $load_library_handler
@@ -85,28 +83,37 @@ Javonet::Core::Handler::HandlerDictionary::add_handler_to_dict(
 sub handle_command {
     my ($self, $command) = @_;
     my $response = Javonet::Core::Handler::HandlerDictionary::get_handler($command->{command_type})->handle_command($command);
-    my $reference_cache = ReferencesCache->new();
 
-    if ($response->isa("Javonet::Core::Handler::Exception")){
+    if (ref $response eq '') {
         return PerlCommand->new(
-            runtime => Javonet::Sdk::Core::RuntimeLib::get_runtime('Perl'),
-            command_type => Javonet::Sdk::Core::PerlCommandType::get_command_type('Exception'),
-            payload => [$response->get_message()]
+            runtime      => Javonet::Sdk::Core::RuntimeLib::get_runtime('Perl'),
+            command_type => Javonet::Sdk::Core::PerlCommandType::get_command_type('Response'),
+            payload      => [ $response ]
         )
     }
-    if (!blessed($response)){
+    elsif (ref $response eq 'ARRAY') {
+        {
+            return PerlCommand->new(
+                runtime      => Javonet::Sdk::Core::RuntimeLib::get_runtime('Perl'),
+                command_type => Javonet::Sdk::Core::PerlCommandType::get_command_type('Array'),
+                payload      => [ $response ]
+            )
+        }
+    }
+    elsif ($response->isa("Javonet::Core::Handler::Exception")) {
         return PerlCommand->new(
-            runtime => Javonet::Sdk::Core::RuntimeLib::get_runtime('Perl'),
-            command_type => Javonet::Sdk::Core::PerlCommandType::get_command_type('Response'),
-            payload => [$response]
+            runtime      => Javonet::Sdk::Core::RuntimeLib::get_runtime('Perl'),
+            command_type => Javonet::Sdk::Core::PerlCommandType::get_command_type('Exception'),
+            payload      => [ $response->get_message() ]
         )
     }
-    else{
+    else {
+        my $reference_cache = ReferencesCache->new();
         my $guid = $reference_cache->cache_reference($response);
         return PerlCommand->new(
-            runtime => Javonet::Sdk::Core::RuntimeLib::get_runtime('Perl'),
-            command_type =>  Javonet::Sdk::Core::PerlCommandType::get_command_type('Reference'),
-            payload =>  [$guid]
+            runtime      => Javonet::Sdk::Core::RuntimeLib::get_runtime('Perl'),
+            command_type => Javonet::Sdk::Core::PerlCommandType::get_command_type('Reference'),
+            payload      => [ $guid ]
         )
     }
 }

package/Binaries/Perl/Linux/X64/lib/Javonet/Sdk/Core/PerlCommandType.pm

@@ -25,7 +25,8 @@ my %command_type = (
     'Optimize'             => 14,
     'GenerateLib'          => 15,
     'InvokeGlobalMethod'   => 16,
-    'DestructReference'    => 17
+    'DestructReference'    => 17,
+    'Array'                => 18
 
 );