The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package TestAppDoubleAutoBug::Controller::Root;

use base 'Catalyst::Controller';

__PACKAGE__->config->{namespace} = '';

sub auto : Private {
    my ( $self, $c ) = @_;
    ++$c->stash->{auto_count};
    return 1;
}

sub default : Private {
    my ( $self, $c ) = @_;
    $c->res->body( sprintf 'default, auto=%d', $c->stash->{auto_count} );
}

sub end : Private {
    my ($self,$c) = @_;
}

1;