Description: new class to represent GPL-1+ clauses
--- /dev/null
+++ b/lib/Software/License/GPL_1_plus.pm
@@ -0,0 +1,42 @@
+use strict;
+use warnings;
+package Software::License::GPL_1_plus;
+
+use base 'Software::License::GPL_1';
+
+sub name { 'The GNU General Public License, Version 1 or later, February 1989' }
+
+1;
+
+=pod
+
+=head1 NAME
+
+Software::License::GPL_1_plus - GNU General Public License, Version 1 or later
+
+=head1 VERSION
+
+version 0.103002
+
+=head1 AUTHOR
+
+Dominique Dumont <ddumont@cpan.org>
+
+=head1 COPYRIGHT AND LICENSE
+
+This software is copyright (c) 2011 by Dominique Dumont
+
+This is free software; you can redistribute it and/or modify it under
+the same terms as the Perl 5 programming language system itself.
+
+=cut
+
+__DATA__
+__DEBIAN-SUMMARY__
+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; either version 1, or (at your option)
+any later version.
+
+On Debian systems, the complete text of version 1 of the GNU General
+Public License can be found in `/usr/share/common-licenses/GPL-1'.
--- a/t/short_name.t
+++ b/t/short_name.t
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 6;
+use Test::More tests => 9;
 
 my $class = 'Software::License';
 require_ok($class);
@@ -14,3 +14,9 @@
 isa_ok($license,'Software::License::GPL_1',"license class");
 like($license->name, qr/version 1/i, "license name");
 like($license->fulltext, qr/general public/i, 'license text');
+
+my $license_plus = $class->new({ short_name => 'GPL-1+', holder => 'X. Ample' });
+
+is($license_plus->holder, 'X. Ample', '(c) holder');
+is($license_plus->year, (localtime)[5]+1900, '(c) year');
+isa_ok($license_plus,'Software::License::GPL_1_plus',"license class");
--- a/lib/Software/License.pm
+++ b/lib/Software/License.pm
@@ -13,6 +13,7 @@
 
 my %short_name = (
   'GPL-1'  => 'GPL_1',
+  'GPL-1+' => 'GPL_1_plus',
   'GPL-2'  => 'GPL_2',
   'GPL-3'  => 'GPL_3',
   'LGPL-2.1' => 'LGPL_2_1',
