Select Code to Download

index.pl
#!/usr/bin/perl
use MyTestApp;
my $menu = MyTestApp->new(PARAMS => { cfg_file => 'menu.conf' });
$menu->run();

MyTestApp.pm
package MyTestApp;
...
    $self->session->flush if $self->session_loaded;
}
1;