Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Structuring multiple CGI::Application modules II

by Anonymous Monk
on Jun 28, 2004 at 17:29 UTC ( [id://370263] : perlquestion . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    #!/usr/local/bin/perl
    use MyApp;
    my $webapp = MyApp->new();
    $webapp->start_mode('show_survey');
    $webapp->run;
    
  2. or download this
    package MyAuth;
    
    ...
    }
    
    1;
    
  3. or download this
    package MyApp;
    use base 'MyAuth';
    ...
    }
    
    1;