# Moose extends etc
with "Catalyst::Component::ApplicationAttribute";

sub somesub {
    my $self = shift;
    my $ctx = $self->_application;
}