use Devel::REPL;

...CATALYST CODE...

sub action_name {
   my ($self,$c) = @_
   ...
   ########### Devel::REPL break
   $Devel::REPL::Plugin::Packages::DefaultScratchpad::ctx = $c;
   my $repl = Devel::REPL->new;
   $repl->load_plugin($_) for qw(History LexEnv Packages PPI);
   $repl->eval('my $c = $Devel::REPL::Plugin::Packages::DefaultScratchpad::ctx;');
   $repl->eval('warn "\n\n[USE \$c from Catalyst!!]\n\n;";');
   $repl->run;
   ########### 
   ....
}