Enhance makefile.pl. gen meta from it

META.yml

@@ -0,0 +1,28 @@
+--- #YAML:1.0
+name:               Business-UPS
+version:            2.01
+abstract:           A UPS Interface Module
+author:
+    - Justin Wheeler <upsmodule@datademons.com>
+license:            perl
+distribution_type:  module
+configure_requires:
+    ExtUtils::MakeMaker:  0
+build_requires:
+    ExtUtils::MakeMaker:  0
+    Test::More:           0
+requires:
+    LWP::UserAgent:  0
+    Test::More:      0
+resources:
+    homepage:    http://wiki.github.com/toddr/business-ups
+    license:     http://dev.perl.org/licenses/
+    repository:  http://github.com/toddr/business-ups/tree/master
+no_index:
+    directory:
+        - t
+        - inc
+generated_by:       ExtUtils::MakeMaker version 6.55_02
+meta-spec:
+    url:      http://module-build.sourceforge.net/META-spec-v1.4.html
+    version:  1.4

Makefile.PL

@@ -1,13 +1,28 @@
 use ExtUtils::MakeMaker;
 
 WriteMakefile(
-    'NAME'	=> 'Business::UPS',
-    'VERSION_FROM' => 'lib/Business/UPS.pm', # finds $VERSION
-    'PREREQ_PM' => {
-	'LWP::UserAgent' => 0,
+    NAME                => 'Business::UPS',
+    AUTHOR              => 'Justin Wheeler <upsmodule@datademons.com>',
+    VERSION_FROM        => 'lib/Business/UPS.pm',
+    ABSTRACT_FROM       => 'lib/Business/UPS.pm',
+    PL_FILES            => {},
+    ($ExtUtils::MakeMaker::VERSION >= 6.3002 ? ('LICENSE'        => 'perl', ) : ()),
+    PREREQ_PM => {
+        'LWP::UserAgent' => 0,
+	'Test::More'     => 0,  # For testing
     },
-    'INSTALLDIRS' => 'site',
-    'EXE_FILES' => [],
-    'PL_FILES' => {},
-    'dist' =>  {'COMPRESS'=>'gzip -9f', 'SUFFIX' => 'gz'}
-);
+    dist                => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
+    clean               => { FILES => 'Net-Business-UPS-*' },
+    META_MERGE  => {
+        build_requires => {
+            'Test::More' => 0,  # For testing
+        },
+        resources => {
+            license => 'http://dev.perl.org/licenses/',
+            homepage => 'http://wiki.github.com/toddr/business-ups',
+#            bugtracker => 'http://code.google.com/p/business-ups/issues/list',
+            repository => 'http://github.com/toddr/business-ups/tree/master',
+#            MailingList => 'http://groups.google.com/group/business-ups',
+        },
+    },
+    );

lib/Business/UPS.pm

@@ -18,7 +18,7 @@ require Exporter;
 #	Copyright 1998 Mark Solomon <msolomon@seva.net> (See GNU GPL)
 #	Started 01/07/1998 Mark Solomon 
 
-$VERSION = do { my @r = (q$Revision: 2.0 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; # must be all one line, for MakeMaker
+$VERSION = '2.01';
 
 sub getUPS {
 
@@ -226,7 +226,7 @@ Business::UPS - A UPS Interface Module
   print "UPS Zone is $ups_zone\n";
 
   %track = UPStrack("z10192ixj29j39");
-  $track{error} and die "ERROR: $track{error};
+  $track{error} and die "ERROR: $track{error}";
 
   # 'Delivered' or 'In-transit'
   print "This package is $track{Current Status}\n";