package Devel::REPL::Profile;
+# ABSTRACT: Code to execute when re.pl starts
-use Moose::Role;
-use namespace::clean -except => [ 'meta' ];
+our $VERSION = '1.003028';
+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
system$ re.pl --profile MyProject
+Alternatively, you can set the environment variable C<DEVEL_REPL_PROFILE> to
+MyProject.
+
When the profile name is unqualified, as in the above example, the profile is
assumed to be in the C<Devel::REPL::Profile::> namespace. Otherwise if you
pass something which contains the C<::> character sequence, it will be loaded
Matt S Trout - mst (at) shadowcatsystems.co.uk (L<http://www.shadowcatsystems.co.uk/>)
-=head1 LICENSE
-
-This library is free software under the same terms as perl itself
-
=cut
-
-1;