The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package TestApp::Controller::Foo;
use Moose;
use namespace::autoclean;

BEGIN { extends 'Catalyst::Controller' }

sub bar :Local {
    my ($self, $c) = @_;
    $c->stash( name => 'Foo Foo' );
}

sub name_zaction_class :Local {
    my ($self, $c) = @_;
    $c->stash(
      name => 'Dave',
      template => 'main',
      zoom_action => 'main',
      zoom_class => 'TestApp::View::HTML::Root',
    );
}

sub name_zaction_class_short :Local {
    my ($self, $c) = @_;
    $c->stash(
      name => 'Dave',
      template => 'main',
      zoom_action => 'main',
      zoom_class => '::Root',
    );
}


__PACKAGE__->meta->make_immutable;