r56900 - in /branches/upstream/libmodern-perl-perl: ./ current/ current/Build.PL current/Changes current/MANIFEST current/META.yml current/README current/lib/ current/lib/Modern/ current/lib/Modern/Perl.pm current/t/ current/t/base.t
ivan at users.alioth.debian.org
ivan at users.alioth.debian.org
Mon Apr 26 02:42:10 UTC 2010
Author: ivan
Date: Mon Apr 26 02:41:58 2010
New Revision: 56900
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=56900
Log:
[svn-inject] Installing original source of libmodern-perl-perl
Added:
branches/upstream/libmodern-perl-perl/
branches/upstream/libmodern-perl-perl/current/
branches/upstream/libmodern-perl-perl/current/Build.PL
branches/upstream/libmodern-perl-perl/current/Changes
branches/upstream/libmodern-perl-perl/current/MANIFEST
branches/upstream/libmodern-perl-perl/current/META.yml
branches/upstream/libmodern-perl-perl/current/README
branches/upstream/libmodern-perl-perl/current/lib/
branches/upstream/libmodern-perl-perl/current/lib/Modern/
branches/upstream/libmodern-perl-perl/current/lib/Modern/Perl.pm
branches/upstream/libmodern-perl-perl/current/t/
branches/upstream/libmodern-perl-perl/current/t/base.t
Added: branches/upstream/libmodern-perl-perl/current/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmodern-perl-perl/current/Build.PL?rev=56900&op=file
==============================================================================
--- branches/upstream/libmodern-perl-perl/current/Build.PL (added)
+++ branches/upstream/libmodern-perl-perl/current/Build.PL Mon Apr 26 02:41:58 2010
@@ -1,0 +1,20 @@
+BEGIN { require 5.010 }
+
+use strict;
+use warnings;
+
+use Module::Build;
+
+my $builder = Module::Build->new(
+ module_name => 'Modern::Perl',
+ license => 'perl',
+ dist_author => 'chromatic <chromatic at wgz.org>',
+ dist_version_from => 'lib/Modern/Perl.pm',
+ build_requires => {
+ 'Test::Simple' => 0.80,
+ 'perl' => 5.010,
+ },
+ add_to_cleanup => [ 'Modern-Perl-*' ],
+);
+
+$builder->create_build_script();
Added: branches/upstream/libmodern-perl-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmodern-perl-perl/current/Changes?rev=56900&op=file
==============================================================================
--- branches/upstream/libmodern-perl-perl/current/Changes (added)
+++ branches/upstream/libmodern-perl-perl/current/Changes Mon Apr 26 02:41:58 2010
@@ -1,0 +1,16 @@
+Revision history for Modern::Perl
+
+1.03 Wed Feb 18 00:40:40 UTC 2009
+ - removed duplicate use lines (Damien Learns Perl)
+ - fixed (hopefully) v-string warnings (Damien, David Moreno)
+ - enabled C3 MRO (Evan Carroll)
+
+1.02 Tue Jan 27 03:44:29 UTC 2009
+ - removed the current need for B::Hooks::Parser (suggested by chocolateboy)
+
+1.01 Tue Jan 27 01:11:48 UTC 2009
+ - fixed a documentation typo reported by Vasily Chekalkin
+ - added caveats to the documentation per bug report from Ben Hengst
+
+1.00 Mon Jan 26 22:41:28 UTC 2009
+ - First version, released on an unsuspecting world.
Added: branches/upstream/libmodern-perl-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmodern-perl-perl/current/MANIFEST?rev=56900&op=file
==============================================================================
--- branches/upstream/libmodern-perl-perl/current/MANIFEST (added)
+++ branches/upstream/libmodern-perl-perl/current/MANIFEST Mon Apr 26 02:41:58 2010
@@ -1,0 +1,7 @@
+Build.PL
+Changes
+MANIFEST
+README
+lib/Modern/Perl.pm
+t/base.t
+META.yml
Added: branches/upstream/libmodern-perl-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmodern-perl-perl/current/META.yml?rev=56900&op=file
==============================================================================
--- branches/upstream/libmodern-perl-perl/current/META.yml (added)
+++ branches/upstream/libmodern-perl-perl/current/META.yml Mon Apr 26 02:41:58 2010
@@ -1,0 +1,20 @@
+---
+name: Modern-Perl
+version: 1.03
+author:
+ - 'chromatic <chromatic at wgz.org>'
+abstract: enable all of the features of Modern Perl with one command
+license: perl
+resources:
+ license: ~
+build_requires:
+ Test::Simple: 0.8
+ perl: 5.01
+provides:
+ Modern::Perl:
+ file: lib/Modern/Perl.pm
+ version: 1.03
+generated_by: Module::Build version 0.31
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.2.html
+ version: 1.2
Added: branches/upstream/libmodern-perl-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmodern-perl-perl/current/README?rev=56900&op=file
==============================================================================
--- branches/upstream/libmodern-perl-perl/current/README (added)
+++ branches/upstream/libmodern-perl-perl/current/README Mon Apr 26 02:41:58 2010
@@ -1,0 +1,46 @@
+Modern::Perl
+------------
+
+Modern Perl often relies on the presence of several core and CPAN pragmas and
+modules. Wouldn't it be nice to use them all with a single command? Try this
+one:
+
+ use Modern::Perl;
+
+INSTALLATION
+
+To install this module, run the following commands:
+
+ $ perl Build.PL
+ $ perl ./Build
+ $ perl ./Build test
+ $ sudo perl ./Build install
+
+SUPPORT AND DOCUMENTATION
+
+After installing, you can find documentation for this module with the
+perldoc command.
+
+ perldoc Modern::Perl
+
+You can also look for information at:
+
+ RT, CPAN's request tracker
+ http://rt.cpan.org/NoAuth/Bugs.html?Dist=Modern-Perl
+
+ AnnoCPAN, Annotated CPAN documentation
+ http://annocpan.org/dist/Modern-Perl
+
+ CPAN Ratings
+ http://cpanratings.perl.org/d/Modern-Perl
+
+ Search CPAN
+ http://search.cpan.org/dist/Modern-Perl/
+
+
+COPYRIGHT AND LICENCE
+
+Copyright (C) 2009 chromatic
+
+This program is free software; you can redistribute it and/or modify it
+under the same terms as Perl itself.
Added: branches/upstream/libmodern-perl-perl/current/lib/Modern/Perl.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmodern-perl-perl/current/lib/Modern/Perl.pm?rev=56900&op=file
==============================================================================
--- branches/upstream/libmodern-perl-perl/current/lib/Modern/Perl.pm (added)
+++ branches/upstream/libmodern-perl-perl/current/lib/Modern/Perl.pm Mon Apr 26 02:41:58 2010
@@ -1,0 +1,106 @@
+package Modern::Perl;
+
+=head1 NAME
+
+Modern::Perl - enable all of the features of Modern Perl with one command
+
+=head1 VERSION
+
+Version 1.03
+
+=cut
+
+our $VERSION = '1.03';
+
+use 5.010_000;
+
+use strict;
+use warnings;
+
+use mro ();
+use feature ();
+
+sub import {
+ warnings->import();
+ strict->import();
+ feature->import( ':5.10' );
+ mro::set_mro( scalar caller(), 'c3' );
+}
+
+=head1 SYNOPSIS
+
+Modern Perl programs use several modules to enable additional features of Perl
+and of the CPAN. Instead of copying and pasting all of these C<use> lines,
+instead write only one:
+
+ use Modern::Perl;
+
+For now, this only enables the L<strict> and L<warnings> pragmas, as well as
+all of the features available in Perl 5.10. It also enables C3 method
+resolution order; see C<perldoc mro> for an explanation. In the future, it
+will include additional CPAN modules which have proven useful and stable.
+
+See L<http://www.modernperlbooks.com/mt/2009/01/toward-a-modernperl.html> for
+more information, and L<http://www.modernperlbooks.com/> for further discussion
+of Modern Perl and its implications.
+
+=head1 AUTHOR
+
+chromatic, C<< <chromatic at wgz.org> >>
+
+=head1 BUGS
+
+None reported.
+
+Please report any bugs or feature requests to C<bug-modern-perl at
+rt.cpan.org>, or through the web interface at
+L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Modern-Perl>. I will be
+notified, and then you'll automatically be notified of progress on your bug as
+I make changes.
+
+=head1 SUPPORT
+
+You can find documentation for this module with the perldoc command.
+
+ perldoc Modern::Perl
+
+You can also look for information at:
+
+=over 4
+
+=item * RT: CPAN's request tracker
+
+L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Modern-Perl>
+
+=item * AnnoCPAN: Annotated CPAN documentation
+
+L<http://annocpan.org/dist/Modern-Perl>
+
+=item * CPAN Ratings
+
+L<http://cpanratings.perl.org/d/Modern-Perl>
+
+=item * Search CPAN
+
+L<http://search.cpan.org/dist/Modern-Perl/>
+
+=back
+
+=head1 ACKNOWLEDGEMENTS
+
+Damian Conway (inspiration from L<Toolkit>), Florian Ragwitz
+(L<B::Hooks::Parser>, so I didn't have to write it myself), chocolateboy (for
+suggesting that I don't even need L<B::Hooks::Parser>, at least for now),
+Damien Learns Perl, David Moreno, and Evan Carroll for reporting bugs and
+requesting features.
+
+=head1 COPYRIGHT & LICENSE
+
+Copyright 2009 chromatic, all rights reserved.
+
+This program is free software; you can redistribute it and/or modify it
+under the same terms as Perl 5.10 itself.
+
+=cut
+
+1; # End of Modern::Perl
Added: branches/upstream/libmodern-perl-perl/current/t/base.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmodern-perl-perl/current/t/base.t?rev=56900&op=file
==============================================================================
--- branches/upstream/libmodern-perl-perl/current/t/base.t (added)
+++ branches/upstream/libmodern-perl-perl/current/t/base.t Mon Apr 26 02:41:58 2010
@@ -1,0 +1,47 @@
+#! perl
+
+use Test::More tests => 5;
+
+BEGIN
+{
+ use_ok( 'Modern::Perl' ) or exit;
+ Modern::Perl->import();
+}
+
+eval 'say "# say() should be available";';
+is( $@, '', 'say() should be available' );
+
+eval '$x = 1;';
+like( $@, qr/Global symbol "\$x" requires explicit/,
+ 'strict should be enabled' );
+
+my $warnings;
+local $SIG{__WARN__} = sub { $warnings = shift };
+my $y =~ s/hi//;
+like( $warnings, qr/Use of uninitialized value/, 'warnings should be enabled' );
+
+eval<<'END_CLASSES';
+
+package A;
+
+$A::VERSION = 1;
+
+package B;
+
+ at B::ISA = 'A';
+
+package C;
+
+ at C::ISA = 'A';
+
+package D;
+
+use Modern::Perl;
+
+ at D::ISA = qw( B C );
+
+END_CLASSES
+
+package main;
+
+is_deeply( mro::get_linear_isa( 'D' ), [qw( D B C A )], 'mro should use C3' );
More information about the Pkg-perl-cvs-commits
mailing list