in reply to CGI::Application and inheritance
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', ); }
Do that in every class and everything will "just work".
------
We are the carpenters and bricklayers of the Information Age.
Then there are Damian modules.... *sigh* ... that's not about being less-lazy -- that's about being on some really good drugs -- you know, there is no spoon. - flyingmoose
I shouldn't have to say this, but any code, unless otherwise stated, is untested
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: CGI::Application and inheritance
by geektron (Curate) on May 19, 2004 at 20:31 UTC |