package mylib::json;
use Exporter 'import';
our @EXPORT=qw(jsonEncode);
use JSON::XS;
sub jsonEncode($) {
my ($o) = @_;
my $j = undef;
eval { $j = JSON::XS->new->encode($o); };
return $@ ? undef : $j;
}
####
package mylib;
use Exporter 'import';
use lib 'mylib';
use mylib::json;
our @EXPORT = ( @mylib::json::EXPORT );
####
use strict;
use warnings;
use lib '.';
use mylib;
print jsonEncode({foo => 'bar'});
####
use strict;
use warnings;
use lib '.';
use mylib;
use JSON::WebToken;
print jsonEncode({foo => 'bar'});
####
Attempt to call undefined import method with arguments ("encode_json" ...) via package "JSON" (Perhaps you forgot to load the package?) at C:/Strawberry/perl/site/lib/JSON/WebToken.pm line 12.