added perl support

This commit is contained in:
Tokuhiro Matsuno
2009-04-15 12:55:41 +09:00
parent b8cc8b72bd
commit 8c62d93bca
16 changed files with 7734 additions and 0 deletions

20
perl/t/Util.pm Normal file
View File

@@ -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;