/usr/share/perl5/Modern/Perl.pm is in libmodern-perl-perl 1.03-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 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
|