javonet-ruby-sdk 2.5.10 → 2.5.12

data/lib/javonet-ruby-sdk/Binaries/Perl/Linux/X64/lib/Javonet/Core/Handler/CommandHandler/InvokeGlobalFunctionHandler.pm

@@ -0,0 +1,63 @@
+package Javonet::Core::Handler::CommandHandler::InvokeGlobalFunctionHandler;
+use strict;
+use warnings FATAL => 'all';
+use lib 'lib';
+use Moose;
+use Nice::Try;
+use aliased 'Javonet::Core::Exception::Exception' => 'Exception';
+extends 'Javonet::Core::Handler::CommandHandler::AbstractCommandHandler';
+
+sub new {
+    my $class = shift;
+    my $self = {
+        required_parameters_count => 1
+    };
+    return bless $self, $class;
+}
+
+sub process {
+    my ($self, $command) = @_;
+    try {
+        # Get the payload array reference and convert to array
+        my $payload_ref = $command->{payload};
+        my @payload = @$payload_ref;
+        my $parameters_length = scalar @payload;
+
+        # Verify at least one parameter is provided
+        if ($parameters_length < $self->{required_parameters_count}) {
+            die Exception->new("InvokeGlobalFunctionHandler parameters mismatch: requires at least one parameter (fully qualified method name)");
+        }
+
+        # The first parameter should be the fully qualified method name
+        my $fully_qualified_method = $payload[0];
+
+        # Extract the package name and method name using a regex
+        unless ($fully_qualified_method =~ /^(.*)::([^:]+)$/) {
+            die Exception->new("Invalid fully qualified method name: $fully_qualified_method");
+        }
+        my ($package, $function_name) = $fully_qualified_method =~ /^(.*)::([^:]+)$/;
+
+        # Attempt to load the package (if not already loaded)
+        eval "require $package";
+        if ($@) {
+            die Exception->new("Failed to load package '$package': $@");
+        }
+        #
+        # Check if the package can perform the method
+        my $code_ref = $package->can($function_name);
+        unless ($code_ref) {
+            die Exception->new("Method '$function_name' not found in package '$package'");
+        }
+
+        # Any additional payload elements are passed as arguments to the method
+        my @args = @payload[1 .. $#payload];
+
+        # Invoke the method with the arguments and return the result
+        return $code_ref->(@args);
+    }
+    catch ($e) {
+        return Exception->new($e);
+    }
+}
+
+1;

data/lib/javonet-ruby-sdk/Binaries/Perl/Linux/X64/lib/Javonet/Core/Handler/PerlHandler.pm

@@ -22,6 +22,7 @@ use aliased 'Javonet::Core::Handler::CommandHandler::ArrayGetItemHandler' => 'Ar
 use aliased 'Javonet::Core::Handler::CommandHandler::ArrayGetSizeHandler' => 'ArrayGetSizeHandler';
 use aliased 'Javonet::Core::Handler::CommandHandler::ArrayGetRankHandler' => 'ArrayGetRankHandler';
 use aliased 'Javonet::Core::Handler::CommandHandler::ArraySetItemHandler' => 'ArraySetItemHandler';
+use aliased 'Javonet::Core::Handler::CommandHandler::InvokeGlobalFunctionHandler' => 'InvokeGlobalFunctionHandler';
 
 
 use aliased 'Javonet::Sdk::Core::PerlCommandType' => 'PerlCommandType', qw(get_command_type);
@@ -48,6 +49,7 @@ my $array_get_item_handler = ArrayGetItemHandler->new();
 my $array_get_size_handler = ArrayGetSizeHandler->new();
 my $array_get_rank_handler = ArrayGetRankHandler->new();
 my $array_set_item_handler = ArraySetItemHandler->new();
+my $invoke_global_function_handler = InvokeGlobalFunctionHandler->new();
 
 
 Javonet::Core::Handler::HandlerDictionary::add_handler_to_dict(
@@ -119,6 +121,11 @@ Javonet::Core::Handler::HandlerDictionary::add_handler_to_dict(
     $array_set_item_handler
 );
 
+Javonet::Core::Handler::HandlerDictionary::add_handler_to_dict(
+    Javonet::Sdk::Core::PerlCommandType::get_command_type('InvokeGlobalFunction'),
+    $invoke_global_function_handler
+);
+
 sub handle_command {
     my ($self, $command) = @_;
     my $response = Javonet::Core::Handler::HandlerDictionary::get_handler($command->{command_type})->handle_command($command);

data/lib/javonet-ruby-sdk/Binaries/Perl/Linux/X64/lib/Javonet/Core/Transmitter/PerlTransmitter.pm

@@ -2,7 +2,7 @@ package Javonet::Core::Transmitter::PerlTransmitter;
 use strict;
 use warnings;
 use Cwd;
-use aliased 'Javonet::Core::Transmitter::PerlTransmitterWrapper' => 'PerlTransmitterWrapper' , qw(send_command activate);
+use aliased 'Javonet::Core::Transmitter::PerlTransmitterWrapper' => 'PerlTransmitterWrapper' , qw(send_command activate set_config_source set_javonet_working_directory);
 
 sub send_command {
     my ($self, $message_byte_array_ref) = @_;
@@ -20,4 +20,9 @@ sub set_config_source {
     PerlTransmitterWrapper->set_config_source($config_path);
 }
 
+sub set_javonet_working_directory {
+    my ($self, $working_directory) = @_;
+    PerlTransmitterWrapper->set_javonet_working_directory($working_directory);
+}
+
 1;

data/lib/javonet-ruby-sdk/Binaries/Perl/Linux/X64/lib/Javonet/Core/Transmitter/PerlTransmitterWrapper.pm

@@ -15,6 +15,7 @@ my $read_response_native;
 my $activate_native;
 my $get_native_error_native;
 my $set_config_source_native;
+my $set_working_directory_native;
 
 sub initialize {
     my $osname = $^O;
@@ -53,6 +54,7 @@ sub initialize {
         $activate_native = $ffi->function('Activate' => ['string'] => 'int');
         $get_native_error_native = $ffi->function('GetNativeError' => [] => 'string');
         $set_config_source_native = $ffi->function('SetConfigSource' => ['string'] => 'int');
+        $set_working_directory_native = $ffi->function('SetWorkingDirectory' => ['string'] => 'int');
     }
 }
 
@@ -102,4 +104,17 @@ sub set_config_source {
     }
 }
 
+sub set_javonet_working_directory {
+    my ($self, $working_directory) = @_;
+    initialize();
+    my $set_working_directory_result = $set_working_directory_native->($working_directory);
+    if ($set_working_directory_result < 0) {
+        my $error_message = $get_native_error_native->();
+        die "Javonet set working directory result: $set_working_directory_result. Native error message: $error_message";
+    }
+    else {
+        return $set_working_directory_result;
+    }
+}
+
 1;

data/lib/javonet-ruby-sdk/Binaries/Perl/Linux/X64/lib/Javonet/Javonet.pm

@@ -6,12 +6,12 @@ use lib 'lib';
 use Try::Tiny;
 use threads;
 use aliased 'Javonet::Sdk::Internal::RuntimeFactory' => 'RuntimeFactory';
-use aliased 'Javonet::Core::Transmitter::PerlTransmitter' => 'Transmitter', qw(activate_with_license_file activate_with_credentials activate_with_credentials_and_proxy);
+use aliased 'Javonet::Core::Transmitter::PerlTransmitter' => 'Transmitter', qw(activate send_command set_config_source set_javonet_working_directory);
 use aliased 'Javonet::Core::Exception::SdkExceptionHelper' => 'SdkExceptionHelper';
 use aliased 'Javonet::Sdk::Core::RuntimeLogger' => 'RuntimeLogger', qw(get_runtime_info);
 
 BEGIN {
-    SdkExceptionHelper->send_exception_to_app_insights("SdkMessage","Javonet Sdk initialized");
+    SdkExceptionHelper->send_exception_to_app_insights("SdkMessage", "Javonet Sdk initialized");
 }
 
 sub activate {
@@ -40,7 +40,7 @@ sub with_config {
         Transmitter->set_config_source($config_path);
         return RuntimeFactory->new(Javonet::Sdk::Internal::ConnectionType::get_connection_type('WithConfig'), undef, $config_path);
     } catch {
-        SdkExceptionHelper->send_exception_to_app_insights($_,"withConfig");
+        SdkExceptionHelper->send_exception_to_app_insights("SdkException", $_);
         die $_;
     };
 }
@@ -54,9 +54,27 @@ sub set_config_source {
     try {
         Transmitter->set_config_source($config_path);
     } catch {
-        SdkExceptionHelper->send_exception_to_app_insights($_,"setConfigSource");
+        SdkExceptionHelper->send_exception_to_app_insights("SdkException", $_);
         die $_;
     };
 }
 
+# Sets the working directory for the Javonet SDK.
+# @param $path [String] The working directory path.
+sub set_javonet_working_directory {
+    my ($self, $path) = @_;
+    try {
+        $path =~ s{\\}{/}g;
+        $path .= '/' unless $path =~ m{/$};
+        mkdir $path, 0700 unless -d $path;
+        #ActivationHelper->working_directory($path);
+        Transmitter->set_javonet_working_directory($path);
+    } catch {
+        SdkExceptionHelper->send_exception_to_app_insights("SdkException", $_);
+        die $_;
+    };
+}
+
+
+
 1;

data/lib/javonet-ruby-sdk/Binaries/Perl/Linux/X64/lib/Javonet/Sdk/Core/PerlCommandType.pm

@@ -20,7 +20,7 @@ my %command_type = (
     'GetInstanceField'          => 13,
     'Optimize'                  => 14,
     'GenerateLib'               => 15,
-    'InvokeGlobalMethod'        => 16,
+    'InvokeGlobalFunction'        => 16,
     'DestructReference'         => 17,
     'Array'                     => 18,
     'ArrayGetItem'              => 19,
@@ -41,6 +41,11 @@ my %command_type = (
     'EnableNamespace'           => 34,
     'EnableType'                => 35,
     'CreateNull'                => 36,
+    'GetStaticMethodAsDelegate' => 37,
+    'GetInstanceMethodAsDelegate' => 38,
+    'PassDelegate'              => 39,
+    'InvokeDelegate'            => 40,
+    'ConvertType'               => 41,
 );
 
 sub get_command_type {

data/lib/javonet-ruby-sdk/Binaries/Perl/Linux/X64/lib/Javonet/Sdk/Internal/Abstract/AbstractRuntimeContext.pm

@@ -0,0 +1,17 @@
+package Javonet::Sdk::Internal::Abstract::AbstractRuntimeContext;
+use strict;
+use warnings FATAL => 'all';
+use Moose;
+use Scalar::Util qw( blessed );
+use Attribute::Abstract;
+
+sub load_library : Abstract;
+sub get_type : Abstract;
+sub cast : Abstract;
+sub get_enum_item : Abstract;
+sub as_out: Abstract;
+sub as_ref: Abstract;
+sub invoke_global_function: Abstract;
+
+no Moose;
+1;

data/lib/javonet-ruby-sdk/Binaries/Perl/Linux/X64/lib/Javonet/Sdk/Internal/RuntimeContext.pm

@@ -167,6 +167,7 @@ sub get_enum_item {
     );
 }
 
+#@override
 sub as_out {
     my $self = shift;
     my @arguments = @_;
@@ -186,6 +187,7 @@ sub as_out {
     );
 }
 
+#@override
 sub as_ref {
     my $self = shift;
     my @arguments = @_;
@@ -206,6 +208,25 @@ sub as_ref {
 }
 
 #@override
+sub invoke_global_function {
+    my $self = shift;
+    my @arguments = @_;
+
+    my $command = PerlCommand->new(
+        runtime => $self->{runtime_name},
+        command_type => Javonet::Sdk::Core::PerlCommandType::get_command_type('InvokeGlobalFunction'),
+        payload => \@arguments
+    );
+
+    return Javonet::Sdk::Internal::InvocationContext->new(
+        $self->{runtime_name},
+        $self->{connection_type},
+        $self->{tcp_address},
+        $self->build_command($command),
+        0
+    );
+}
+
 sub build_command {
     my ($self, $command) = @_;
     my $payload_length = @{$command->{payload}};

data/lib/javonet-ruby-sdk/Binaries/Perl/Windows/X64/deps/bin/yamlpp-load-dump.bat

@@ -29,11 +29,14 @@ GetOptions(
     'help|h' => \my $help,
     'boolean=s' => \my $boolean,
     'cyclic' => \my $cyclic,
+    'duplicate-keys' => \my $duplicate_keys,
     'indent=i' => \my $indent,
     'width=i' => \my $width,
     'header!' => \my $header,
     'footer!' => \my $footer,
     'merge' => \my $merge,
+    #'catchall' => \my $catchall,
+    'require-footer' => \my $require_footer,
     'perl' => \my $perl,
     'preserve|P=s' => \my $preserve,
     'module|M=s' => \my $module,
@@ -63,6 +66,9 @@ if ($merge) {
 if ($perl) {
     push @schema, 'Perl';
 }
+#if ($catchall) {
+#    push @schema, 'Catchall';
+#}
 
 my $preserve_order = 1;
 if (defined $preserve) {
@@ -145,6 +151,7 @@ sub _yamlpp {
         schema => \@schema,
         boolean => $boolean,
         cyclic_refs => $cyclic ? 'allow' : 'fatal',
+        duplicate_keys => $duplicate_keys ? 1 : 0,
         preserve => $preserve,
         indent => $indent,
         width => $width,
@@ -152,6 +159,7 @@ sub _yamlpp {
         footer => $footer ? 1 : 0,
         yaml_version => \@yaml_versions,
         version_directive => $version_directive || 0,
+        require_footer => $require_footer,
     );
     if ($inc) {
         $inc->yp($ypp);
@@ -293,11 +301,13 @@ Usage:
 Options:
     --boolean=            'perl', 'JSON::PP', 'boolean'
     --cyclic              Allow cyclic references
+    --duplicate-keys      Allow duplicate keys
     --indent=             Number of spaces for indentation
     --width=              Maximum column width (only used in flow style for now)
     --[no-]header         Print '---' (default)
     --[no-]footer         Print '...'
     --merge               Enable loading merge keys '<<'
+    --require-footer      Require '...' and the end of each document
     --perl                Enable loading perl types and objects (use only
                           on trusted input!)
     --preserve, -P        Comma separated: 'order', 'scalar', 'flow', 'alias'.
@@ -313,6 +323,7 @@ Options:
     --include-absolute    Allow absolute paths and ../../../ in includes (use
                           only on trusted input!)
 EOM
+#    --catchall            Ignore any unknown tags
     exit $rc;
 }
 __END__

data/lib/javonet-ruby-sdk/Binaries/Perl/Windows/X64/deps/bin/yamlpp-load.bat

@@ -27,7 +27,10 @@ GetOptions(
     'help|h' => \my $help,
     'boolean=s' => \my $boolean,
     'cyclic' => \my $cyclic,
+    'duplicate-keys' => \my $duplicate_keys,
     'merge' => \my $merge,
+    #'catchall' => \my $catchall,
+    'require-footer' => \my $require_footer,
     'perl' => \my $perl,
     'module|M=s' => \my $module,
     'yaml-version=s' => \my $yaml_version,
@@ -46,6 +49,9 @@ if ($merge) {
 if ($perl) {
     push @schema, 'Perl';
 }
+#if ($catchall) {
+#    push @schema, 'Catchall';
+#}
 
 my ($file) = @ARGV;
 my $yaml;
@@ -84,8 +90,10 @@ sub _yamlpp {
         schema => \@schema,
         boolean => $boolean,
         cyclic_refs => $cyclic ? 'allow' : 'fatal',
+        duplicate_keys => $duplicate_keys ? 1 : 0,
         preserve => PRESERVE_ORDER,
         yaml_version => \@yaml_versions,
+        require_footer => $require_footer,
     );
     my @docs = $ypp->load_string($yaml);
     return @docs;
@@ -147,13 +155,16 @@ Usage:
 Options:
     --boolean=            'perl', 'JSON::PP', 'boolean'
     --cyclic              Allow cyclic references
+    --duplicate-keys      Allow duplicate keys
     --merge               Enable loading merge keys '<<'
+    --require-footer      Require '...' and the end of each document
     --perl                Enable loading perl types and objects (use only
                           on trusted input!)
     --module -M           YAML::PP (default), YAML, YAML::PP::LibYAML,
                           YAML::Syck, YAML::Tiny, YAML::XS, YAML::PP::Ref
     --yaml-version=       '1.2' (default), '1.1', '1.2,1.1', '1.1,1.2'
 EOM
+    #--catchall            Ignore any unknown tags
     exit $rc;
 }
 __END__

data/lib/javonet-ruby-sdk/Binaries/Perl/Windows/X64/deps/lib/perl5/MSWin32-x64-multi-thread/perllocal.pod

@@ -1,4 +1,4 @@
-=head2 Sat Jan 11 10:49:22 2025: C<Module> L<Data::UUID|Data::UUID>
+=head2 Thu Feb 13 08:30:02 2025: C<Module> L<Test::Fatal|Test::Fatal>
 
 =over 4
 
@@ -12,7 +12,7 @@ C<LINKTYPE: dynamic>
 
 =item *
 
-C<VERSION: 1.227>
+C<VERSION: 0.017>
 
 =item *
 
@@ -20,7 +20,7 @@ C<EXE_FILES: >
 
 =back
 
-=head2 Sat Jan 11 10:49:37 2025: C<Module> L<YAML::PP|YAML::PP>
+=head2 Thu Feb 13 08:30:26 2025: C<Module> L<autobox|autobox>
 
 =over 4
 
@@ -34,15 +34,15 @@ C<LINKTYPE: dynamic>
 
 =item *
 
-C<VERSION: v0.38.0>
+C<VERSION: v3.0.2>
 
 =item *
 
-C<EXE_FILES: bin/yamlpp-events bin/yamlpp-highlight bin/yamlpp-load bin/yamlpp-load-dump bin/yamlpp-parse-emit>
+C<EXE_FILES: >
 
 =back
 
-=head2 Sat Jan 11 10:49:40 2025: C<Module> L<Safe::Isa|Safe::Isa>
+=head2 Thu Feb 13 08:30:32 2025: C<Module> L<Safe::Isa|Safe::Isa>
 
 =over 4
 
@@ -64,7 +64,7 @@ C<EXE_FILES: >
 
 =back
 
-=head2 Sat Jan 11 10:49:44 2025: C<Module> L<PPI|PPI>
+=head2 Thu Feb 13 08:30:39 2025: C<Module> L<YAML::PP|YAML::PP>
 
 =over 4
 
@@ -78,15 +78,15 @@ C<LINKTYPE: dynamic>
 
 =item *
 
-C<VERSION: 1.281>
+C<VERSION: v0.39.0>
 
 =item *
 
-C<EXE_FILES: >
+C<EXE_FILES: bin/yamlpp-events bin/yamlpp-highlight bin/yamlpp-load bin/yamlpp-load-dump bin/yamlpp-parse-emit>
 
 =back
 
-=head2 Sat Jan 11 10:49:49 2025: C<Module> L<PPI::XS|PPI::XS>
+=head2 Thu Feb 13 08:30:43 2025: C<Module> L<PPI|PPI>
 
 =over 4
 
@@ -100,7 +100,7 @@ C<LINKTYPE: dynamic>
 
 =item *
 
-C<VERSION: 0.910>
+C<VERSION: 1.281>
 
 =item *
 
@@ -108,7 +108,7 @@ C<EXE_FILES: >
 
 =back
 
-=head2 Sat Jan 11 10:49:55 2025: C<Module> L<Want|Want>
+=head2 Thu Feb 13 08:30:47 2025: C<Module> L<PPI::XS|PPI::XS>
 
 =over 4
 
@@ -122,7 +122,7 @@ C<LINKTYPE: dynamic>
 
 =item *
 
-C<VERSION: 0.29>
+C<VERSION: 0.910>
 
 =item *
 
@@ -130,7 +130,7 @@ C<EXE_FILES: >
 
 =back
 
-=head2 Sat Jan 11 10:49:57 2025: C<Module> L<Nice::Try|Nice::Try>
+=head2 Thu Feb 13 08:30:52 2025: C<Module> L<Want|Want>
 
 =over 4
 
@@ -144,7 +144,7 @@ C<LINKTYPE: dynamic>
 
 =item *
 
-C<VERSION: v1.3.15>
+C<VERSION: 0.29>
 
 =item *
 
@@ -152,7 +152,7 @@ C<EXE_FILES: >
 
 =back
 
-=head2 Sat Jan 11 10:50:02 2025: C<Module> L<Attribute::Util|Attribute::Util>
+=head2 Thu Feb 13 08:30:55 2025: C<Module> L<Nice::Try|Nice::Try>
 
 =over 4
 
@@ -166,7 +166,7 @@ C<LINKTYPE: dynamic>
 
 =item *
 
-C<VERSION: 1.07>
+C<VERSION: v1.3.15>
 
 =item *
 
@@ -174,7 +174,7 @@ C<EXE_FILES: >
 
 =back
 
-=head2 Sat Jan 11 10:50:08 2025: C<Module> L<Test::Fatal|Test::Fatal>
+=head2 Thu Feb 13 08:30:58 2025: C<Module> L<Data::Cmp|Data::Cmp>
 
 =over 4
 
@@ -188,7 +188,7 @@ C<LINKTYPE: dynamic>
 
 =item *
 
-C<VERSION: 0.017>
+C<VERSION: 0.010>
 
 =item *
 
@@ -196,7 +196,7 @@ C<EXE_FILES: >
 
 =back
 
-=head2 Sat Jan 11 10:50:13 2025: C<Module> L<autobox|autobox>
+=head2 Thu Feb 13 08:31:05 2025: C<Module> L<Data::UUID|Data::UUID>
 
 =over 4
 
@@ -210,7 +210,7 @@ C<LINKTYPE: dynamic>
 
 =item *
 
-C<VERSION: v3.0.2>
+C<VERSION: 1.227>
 
 =item *
 
@@ -218,7 +218,7 @@ C<EXE_FILES: >
 
 =back
 
-=head2 Sat Jan 11 10:50:16 2025: C<Module> L<Data::Cmp|Data::Cmp>
+=head2 Thu Feb 13 08:31:08 2025: C<Module> L<Attribute::Util|Attribute::Util>
 
 =over 4
 
@@ -232,7 +232,7 @@ C<LINKTYPE: dynamic>
 
 =item *
 
-C<VERSION: 0.010>
+C<VERSION: 1.07>
 
 =item *
 
@@ -240,7 +240,7 @@ C<EXE_FILES: >
 
 =back
 
-=head2 Sat Jan 11 10:50:21 2025: C<Module> L<Scalar::Util::Numeric|Scalar::Util::Numeric>
+=head2 Thu Feb 13 08:31:13 2025: C<Module> L<Scalar::Util::Numeric|Scalar::Util::Numeric>
 
 =over 4
 

data/lib/javonet-ruby-sdk/Binaries/Perl/Windows/X64/deps/lib/perl5/YAML/PP/Common.pm

@@ -2,7 +2,7 @@ use strict;
 use warnings;
 package YAML::PP::Common;
 
-our $VERSION = 'v0.38.0'; # VERSION
+our $VERSION = 'v0.39.0'; # VERSION
 
 use base 'Exporter';
 

data/lib/javonet-ruby-sdk/Binaries/Perl/Windows/X64/deps/lib/perl5/YAML/PP/Constructor.pm

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 package YAML::PP::Constructor;
 
-our $VERSION = 'v0.38.0'; # VERSION
+our $VERSION = 'v0.39.0'; # VERSION
 
 use YAML::PP;
 use YAML::PP::Common qw/
@@ -25,6 +25,7 @@ sub new {
     unless (defined $duplicate_keys) {
         $duplicate_keys = 0;
     }
+    my $require_footer = delete $args{require_footer};
     my $preserve = delete $args{preserve} || 0;
     if ($preserve == 1) {
         $preserve = PRESERVE_ORDER | PRESERVE_SCALAR_STYLE | PRESERVE_FLOW_STYLE | PRESERVE_ALIAS;
@@ -44,6 +45,7 @@ sub new {
         cyclic_refs => $cyclic_refs,
         preserve => $preserve,
         duplicate_keys => $duplicate_keys,
+        require_footer => $require_footer,
     }, $class;
     $self->init;
     return $self;
@@ -89,6 +91,7 @@ sub preserve_scalar_style { return $_[0]->{preserve} & PRESERVE_SCALAR_STYLE }
 sub preserve_flow_style { return $_[0]->{preserve} & PRESERVE_FLOW_STYLE }
 sub preserve_alias { return $_[0]->{preserve} & PRESERVE_ALIAS }
 sub duplicate_keys { return $_[0]->{duplicate_keys} }
+sub require_footer { return $_[0]->{require_footer} }
 
 sub document_start_event {
     my ($self, $event) = @_;
@@ -118,6 +121,9 @@ sub document_end_event {
         die "Got unexpected end of document";
     }
     my $docs = $self->docs;
+    if ($event->{implicit} and $self->require_footer) {
+        die sprintf "load: Document (%d) did not end with '...' (require_footer=1)", 1 + scalar @$docs;
+    }
     push @$docs, $last->{ref}->[0];
     $self->set_anchors({});
     $self->set_stack([]);

data/lib/javonet-ruby-sdk/Binaries/Perl/Windows/X64/deps/lib/perl5/YAML/PP/Dumper.pm

@@ -2,7 +2,7 @@ use strict;
 use warnings;
 package YAML::PP::Dumper;
 
-our $VERSION = 'v0.38.0'; # VERSION
+our $VERSION = 'v0.39.0'; # VERSION
 
 use Scalar::Util qw/ blessed refaddr reftype /;
 use YAML::PP;

data/lib/javonet-ruby-sdk/Binaries/Perl/Windows/X64/deps/lib/perl5/YAML/PP/Emitter.pm

@@ -2,7 +2,7 @@ use strict;
 use warnings;
 package YAML::PP::Emitter;
 
-our $VERSION = 'v0.38.0'; # VERSION
+our $VERSION = 'v0.39.0'; # VERSION
 use Data::Dumper;
 
 use YAML::PP::Common qw/

data/lib/javonet-ruby-sdk/Binaries/Perl/Windows/X64/deps/lib/perl5/YAML/PP/Exception.pm

@@ -2,7 +2,7 @@ use strict;
 use warnings;
 package YAML::PP::Exception;
 
-our $VERSION = 'v0.38.0'; # VERSION
+our $VERSION = 'v0.39.0'; # VERSION
 
 use overload '""' => \&to_string;