package FlierAdminReports; use strict; use base qw/ FlierReports /; sub setup { my $self = shift; $self->start_mode( 'options' ); $self->mode_param( 'rm' ); $self->run_modes( options => \&searchOpts, summary => \&orderSummary, ); } #### package FlierReports; use strict; use Data::Dumper; use base qw/ FlierFunctions /; sub setup { my $self = shift; # Setup the run mode stuff $self->start_mode( 'openOrders' ); $self->mode_param( 'rm' ); $self->run_modes( openOrders => \&openOrderSummary, detail => \&openOrderDetail, markDone => \&markFinished, ); } #### No such run-mode 'detail' at /usr/lib/perl5/site_perl/5.8.0/CGI/Application.pm line 133