Sophie: perl-Plack-1.4.700-1.1.mga6 noarch

perl-Plack-1.4.700-1.1.mga6.noarch.rpm

Info
Deps
Files
Scripts
ChangeLog
Location
Others versions
Analyse

my $app = sub {
    my $env = shift;

    return sub {
        my $respond = shift;
        my $w = $respond->([ 200, ['X-Foo' => 'bar', 'Content-Type' => 'text/plain'] ]);
        for (1..5) {
            sleep 1;
            $w->write(time . "\n");
        }
    };
};