blob: 33be1d3ec4b26823117f91a7b5fe5a22fd1b010b (
plain) (
tree)
|
|
#!/usr/bin/env perl
use Data::Dumper;
my $app = sub {
my $env = shift;
return [
'200',
[ 'Content-Type' => 'text/plain' ],
[ "Hello from Unit, Perl $^V, environment:\n\n", Dumper($env) ],
];
};
|