gistfile1.pl

use strict;
use KiokuDB;
use KiokuDB::Class;

print "Class::MOP -> ", $Class::MOP::VERSION, "\n";
print "Moose -> ", $Moose::VERSION, "\n";
print "KiokuDB -> ", $KiokuDB::VERSION, "\n";

my $meta = Moose::Meta::Class->initialize('KiokuDB::Class');
$meta->get_method_list();

__END__
KiokuDB::Class does not export its sugar to the 'main' package.
Class::MOP -> 0.94
Moose -> 0.92
KiokuDB -> 0.32
Can't call method "wrap" on an undefined value at /Users/daisuke/perl5/lib/perl5/darwin-2level/Class/MOP/Package.pm line 306.