Sha256: 1cbf786369878ab7a8379d3cfd11a29cb8dbf7cb57fb26e4ad8c1263f8e82928
Contents?: true
Size: 1.23 KB
Versions: 10
Compression:
Stored size: 1.23 KB
Contents
package Javonet::Core::Transmitter::PerlTransmitter;
use strict;
use warnings;
use Cwd;
use aliased 'Javonet::Core::Transmitter::PerlTransmitterWrapper' => 'PerlTransmitterWrapper' , qw(send_command_ activate_);
sub send_command {
my ($self, $message_byte_array_ref) = @_;
my $response_byte_array_ref = PerlTransmitterWrapper->send_command($message_byte_array_ref);
return $response_byte_array_ref;
}
sub activate_with_license_file {
return __activate();
}
sub activate_with_credentials {
my($self, $licenseKey) = @_;
return __activate($licenseKey);
}
sub activate_with_credentials_and_proxy {
my($self, $licenseKey, $proxyHost, $proxyUserName, $proxyPassword) = @_;
return __activate($licenseKey, $proxyHost, $proxyUserName, $proxyPassword);
}
sub __activate {
my($licenseKey, $proxyHost, $proxyUserName, $proxyPassword) = @_;
#set default values
$licenseKey //="";
$proxyHost //="";
$proxyUserName //="";
$proxyPassword //="";
return PerlTransmitterWrapper->activate($licenseKey, $proxyHost, $proxyUserName, $proxyPassword);
}
sub set_config_source {
my ($self, $config_path) = @_;
PerlTransmitterWrapper->set_config_source($config_path);
}
1;
Version data entries
10 entries across 10 versions & 1 rubygems