Add headers to Lmo and WebAPI modules, and put the modules in pt-agent.

lib/Lmo/Object.pm

@@ -1,4 +1,24 @@
-# Mo::Object is the parent of every Mo-derived object. Here's where new
+# This program is copyright 2012-2013 Percona Inc.
+# Feedback and improvements are welcome.
+#
+# THIS PROGRAM IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED
+# WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
+# MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+#
+# This program is free software; you can redistribute it and/or modify it under
+# the terms of the GNU General Public License as published by the Free Software
+# Foundation, version 2; OR the Perl Artistic License.  On UNIX and similar
+# systems, you can issue `man perlgpl' or `man perlartistic' to read these
+# licenses.
+#
+# You should have received a copy of the GNU General Public License along with
+# this program; if not, write to the Free Software Foundation, Inc., 59 Temple
+# Place, Suite 330, Boston, MA  02111-1307  USA.
+# ###########################################################################
+# Lmo::Object package
+# ###########################################################################
+{
+# Lmo::Object is the parent of every Mo-derived object. Here's where new
 # and BUILDARGS gets inherited from.
 package Lmo::Object;
 
@@ -6,9 +26,11 @@ use strict;
 use warnings qw( FATAL all );
 
 use Carp ();
-use Scalar::Util qw(looks_like_number blessed);
+use Scalar::Util qw(blessed);
 
-use Lmo::Meta;
+eval {
+   require Lmo::Meta;
+};
 
 {
    # Gets the glob from a given string.
@@ -100,5 +122,8 @@ sub meta {
    return Lmo::Meta->new(class => $class);
 }
 
-
 1;
+}
+# ###########################################################################
+# End Lmo::Object package
+# ###########################################################################