Include and process for Mojolicious app

gistfile1.pl

#!/usr/bin/env perl
use lib 'lib';

package Mojolicious::Plugin::IncludeHelpers;
use strict;
use warnings;

use base 'Mojolicious::Plugin';

use Data::Dumper;

sub register {
    my ($self, $app) = @_;
	
	$app->helper(process => sub { shift->render_partial(@_) });
	$app->helper(include => sub {
		my $self = shift;
		my $data = $self->render_partial(@_);
		
		# warn Dumper $self->stash;
		
		my $captures = $self->{stash}->{'mojo.captures'};
		$self->stash($_ => $captures->{$_}) for grep { $self->stash($_) } keys %{$captures||{}};
		
		# warn Dumper $self->stash;
		
		return $data;
	});
}

package main;
use Mojolicious::Lite;

plugin 'include_helpers';

get '/:template' => { user => 'Foo' };

app->log->level('error');

use Test::Mojo;
use Test::More tests => 6;

my $t = Test::Mojo->new;

$t->get_ok('/process')
  ->status_is(200)
  ->content_is("Foo\nHello, Bar!\n\nBar\n")
;

$t->get_ok('/include')
  ->status_is(200)
  ->content_is("Foo\nHello, Bar!\n\nFoo\n")
;

__DATA__

@@ process.html.ep

%= stash 'user'
%= process 'inc', user => 'Bar'
%= stash 'user'

@@ include.html.ep

%= stash 'user'
%= include 'inc', user => 'Bar'
%= stash 'user'

@@ inc.html.ep

Hello, <%= $user %>!