This is a tad on the late side. :-)

The situation you discuss earlier is one that I'm also facing. I'd be interested in breaking a C::A into one or more C::As.

I've tried to recreate the method you've used but I've hit a snag.

You have

package My::Application::Base;
use CGI::Application;
our @ISA = qw( CGI::Application );

sub setup{
    # Do basic stuff, including run_modes everyone has, like 'redirect
+_login'
}
[download]

Note the reference to run_modes. Later you have

package My::Application::Reports;
use My::Application::Base;
our @ISA = qw( My::Application::Base );

sub setup{
    my $self = shift;

    $self->runmodes([qw(
        choose
        display
    )]);
}
[download]

As far as I can tell the run_modes in Base are overwritten by the run_modes in Reports and I get a "No such run mode..." error when reffering to any run_mode in Base.

Did you encounter this?

Also, how would you implement such a scheme as this? Would each C::A have its own instance script?

Update:

fwi, I've post my attempt here