Add a benchmark for load_class()

diff --git a/benchmarks/load_class.pl b/benchmarks/load_class.pl
new file mode 100755 (executable)
index 0000000..1c11228
--- /dev/null
+++ b/benchmarks/load_class.pl
@@ -0,0 +1,19 @@
+#!perl
+use strict;
+use warnings;
+use Benchmark qw/cmpthese/;
+
+use Class::MOP;
+use Mouse();
+
+print "Class::MOP $Class::MOP::VERSION\n";
+print "Mouse      $Mouse::VERSION\n";
+
+cmpthese -1 => {
+    'Class::MOP::load_class' => sub{
+        Class::MOP::load_class('Class::MOP::Class');
+    },
+    'Mouse::Util::load_class' => sub{
+        Mouse::Util::load_class('Class::MOP::Class');
+    },
+};