mirror of
https://github.com/msgpack/msgpack-c.git
synced 2025-03-19 21:18:23 +01:00
19 lines
321 B
Perl
19 lines
321 B
Perl
package t::Util;
|
|
use strict;
|
|
use warnings;
|
|
use Data::MessagePack;
|
|
|
|
sub import {
|
|
my $pkg = caller(0);
|
|
|
|
strict->import;
|
|
warnings->import;
|
|
|
|
no strict 'refs';
|
|
*{"$pkg\::true"} = \&Data::MessagePack::true;
|
|
*{"$pkg\::false"} = \&Data::MessagePack::false;
|
|
*{"$pkg\::null"} = sub() { undef };
|
|
}
|
|
|
|
1;
|