Devel::REPL::Plugin::LexEnv - Provide a lexical environment for the REPL
# in your re.pl file:
use Devel::REPL;
my $repl = Devel::REPL->new;
$repl->load_plugin('LexEnv');
$repl->lexical_environment->do(<<'CODEZ');
use FindBin;
use lib "$FindBin::Bin/../lib";
use MyApp::Schema;
my $s = MyApp::Schema->connect('dbi:Pg:dbname=foo','broseph','elided');
CODEZ
$repl->run;
# after you run re.pl:
$ warn $s->resultset('User')->first->first_name # <-- note that $s works
Bugs may be submitted through the RT bug tracker
<https://rt.cpan.org/Public/Dist/Display.html?Name=Devel-REPL> (or
bug-Devel-REPL@rt.cpan.org <mailto:bug-Devel-REPL@rt.cpan.org>).
There is also an irc channel available for users of this
distribution, at "#devel" on
"irc.perl.org"
<irc://irc.perl.org/#devel-repl>.
Matt S Trout - mst (at) shadowcatsystems.co.uk
(<http://www.shadowcatsystems.co.uk/>)
This software is copyright (c) 2007 by Matt S Trout - mst (at)
shadowcatsystems.co.uk (<http://www.shadowcatsystems.co.uk/>).
This is free software; you can redistribute it and/or modify it
under the same terms as the Perl 5 programming language system itself.