/usr/share/perl5/Module/Starter/Plugin/CGIApp/templates/titanium/test-app.t is in libmodule-starter-plugin-cgiapp-perl 0.30-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | #!/usr/bin/perl
# Test application functionality
use strict;
use warnings;
use Test::More tests => 1;
use Test::WWW::Mechanize::CGIApp;
use <tmpl_var main_module>;
my $mech = Test::WWW::Mechanize::CGIApp->new;
$mech->app(
sub {
my $app = <tmpl_var main_module>->new(PARAMS => {
});
$app->run();
}
);
$mech->get_ok(q{/});
|