X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FProfile.pm;h=b2e95da9b9a0bc52c9f592bb333627e464a3c289;hp=b449c54dcd2d0db0fde47dc3890eb37fd91c8825;hb=796cd7ec80de14e45ca8221d545aceb7b9bc0b71;hpb=a4dd2d8933ca2a9b4f627dfe6d03d679171372e4 diff --git a/lib/Devel/REPL/Profile.pm b/lib/Devel/REPL/Profile.pm index b449c54..b2e95da 100644 --- a/lib/Devel/REPL/Profile.pm +++ b/lib/Devel/REPL/Profile.pm @@ -1,28 +1,31 @@ package Devel::REPL::Profile; +# ABSTRACT: Code to execute when re.pl starts -use Moose::Role; -use namespace::clean -except => [ 'meta' ]; +our $VERSION = '1.003027'; +use Moose::Role; requires 'apply_profile'; +use namespace::autoclean; -=head1 NAME +1; +__END__ -Devel::REPL::Profile +=pod =head1 SYNOPSIS package Devel::REPL::Profile::MyProject; - + use Moose; - use namespace::clean -except => [ 'meta' ]; - + use namespace::autoclean; + with 'Devel::REPL::Profile'; - + sub apply_profile { my ($self, $repl) = @_; # do something here } - + 1; =head1 DESCRIPTION @@ -68,6 +71,9 @@ To run the shell with a particular profile, use the following command: system$ re.pl --profile MyProject +Alternatively, you can set the environment variable C to +MyProject. + When the profile name is unqualified, as in the above example, the profile is assumed to be in the C namespace. Otherwise if you pass something which contains the C<::> character sequence, it will be loaded @@ -77,10 +83,4 @@ as-is. Matt S Trout - mst (at) shadowcatsystems.co.uk (L) -=head1 LICENSE - -This library is free software under the same terms as perl itself - =cut - -1;