Static C++ fields and properties from Perl package
This article provides an introduction to cross-technology handling of static fields and properties.
Javonet allows you to reference and use modules or packages written in (Java/Kotlin/Groovy/Clojure, C#/VB.NET, Ruby, Perl, Python, JavaScript/TypeScript) like they were created in your technology. If have not yet created your first project check Javonet overview and quick start guides for your technology.
With Javonet you can interact with static field and properties from Perl package like they were available in C++ but invocation must be performed through Javonet SDK API.
Get/Set static C++ field from custom Perl package
With Javonet it is possible to reference any custom Perl package and interact with public static fields and properties declared on types defined within that module almost the same as with any other C++ library.
Snippet below represents the sample code from Perl package which contains class with fields:
our $static_value = 3;
sub new {
my $class = shift;
my $self =
{
public_value => 1,
private_value => 2,
};
return bless $self, $class;
}
It is possible to get one of the declared static fields from Perl package using following C++ code.
// use Activate only once in your app
Javonet::Activate("your-license-key");
// create called runtime context
auto calledRuntime = Javonet::InMemory()->Perl();
// set up variables
auto libraryPath = resourcesDirectory + "/TestClass.pm";
auto className = "TestClass::TestClass";
// load custom library
calledRuntime->LoadLibrary(libraryPath);
// get type from the runtime
auto calledRuntimeType = calledRuntime->GetType(className)->Execute();
// get type's static field
auto response = calledRuntimeType->GetStaticField("static_value")->Execute();
// get value from response
auto result = std::any_cast<int>(response->GetValue());
// write result to console
std::cout << result << std::endl;
This uses in memory runtime bridging to load the Perl package, and next retrieves reference to specific type and gets the static field. Result of the invocation is returned as regular C++ value and can be used for further processing. It is possible to set one of the declared static fields from Perl package using following C++ code.
// use Activate only once in your app
Javonet::Activate("your-license-key");
// create called runtime context
auto calledRuntime = Javonet::InMemory()->Perl();
// set up variables
auto libraryPath = resourcesDirectory + "/TestClass.pm";
auto className = "TestClass::TestClass";
// load custom library
calledRuntime->LoadLibrary(libraryPath);
// get type from the runtime
auto calledRuntimeType = calledRuntime->GetType(className)->Execute();
// set type's static field
calledRuntimeType->SetStaticField("static_value", 75 )->Execute();
// get type's static field
auto response = calledRuntimeType->GetStaticField("static_value")->Execute();
// get value from response
auto result = std::any_cast<int>(response->GetValue());
// write result to console
std::cout << result << std::endl;
This uses in memory runtime bridging to load the Perl package, and next retrieves reference to specific type, then sets and gets the static field. Result of the invocation is returned as regular C++ value and can be used for further processing.
Get/Set static C++ field from standard Perl package
The same steps are required to get types and fields from framework Perl package:
The same operation can be performed remotely by just changing the new Runtime Context invocation from in memory to tcp that will create and interact with your Perl package objects on any remote node, container or service that hosts Javonet Code Gateway. This way you can preserve the same logic in your application and instantly switch between monolithic and microservices architecture without the need to implement the integration layer based on web services or other remote invocation methods.
Read more about use cases and software architecture scenarios where Javonet runtime bridging technology can support your development process.
Was this article helpful?