;
use IO::Socket::INET;
#use IO::Socket::INET6;
#use IO::Socket::SSL;
use IPC::Run qw(start);
use JSON;
use Math::Round;
use Math::Trig;
use Module::Load qw(load);
use Net::OpenSSH;
use POSIX qw(ceil
$newLine .= '...';
}
return $newLine;
}
sub encodeJson {
# Uses the JSON module to convert a Perl data structure to a UTF-8 encoded binary string
#
return $axmud::CLIENT->writeImproper($self->_objClass . '->encodeJson', @_);
}
$obj = JSON->new();
$obj->allow_nonref();
$obj->allow_unknown();
$
$obj->space_after();
return $obj->utf8->encode($data);
}
sub decodeJson {
# Uses the JSON module to convert a UTF-8 encoded binary string to a Perl data structure
#
;
use IO::Socket::INET;
#use IO::Socket::INET6;
#use IO::Socket::SSL;
use IPC::Run qw(start);
use JSON;
use Math::Round;
use Math::Trig;
use Module::Load qw(load);
use Net::OpenSSH;
use POSIX qw(ceil