File: mojolite-fastcgi.pl

package info (click to toggle)
libmojo-server-fastcgi-perl 0.50-2
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 124 kB
  • sloc: perl: 423; makefile: 2
file content (43 lines) | stat: -rwxr-xr-x 608 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
 
#!/usr/bin/env perl

use 5.10.1;
use strict;
use utf8;
use warnings;
use Mojolicious::Lite;

get '/' => sub {
    shift->render('index');
};

app->start('fastcgi');

__DATA__

@@ index.html.ep
<table>
    <tr>
        <td>
            Perl
        </td>
        <td>
            %== $^V
        </td>
    </tr>
    <tr>
        <td>
            Mojolicious
        </td>
        <td>
            %== Mojolicious->VERSION
        </td>
    </tr>
    <tr>
        <td>
            Mojo::Server::FastCGI
        </td>
        <td>
            %== Mojo::Server::FastCGI->VERSION
        </td>
    </tr>
</table>