added perl support

1 files changed, 20 insertions, 0 deletions

diff --git a/perl/t/Util.pm b/perl/t/Util.pm
new file mode 100644
index 0000000..c8debef
--- /dev/null
+++ b/perl/t/Util.pm
@@ -0,0 +1,20 @@
+package t::Util;
+use strict;
+use warnings;
+
+sub import {
+    my $pkg = caller(0);
+
+    strict->import;
+    warnings->import;
+
+    no strict 'refs';
+    *{"$pkg\::true"} = sub () {
+        Data::MessagePack::true()
+    };
+    *{"$pkg\::false"} = sub () {
+        Data::MessagePack::false()
+    };
+}
+
+1;