Sophie

Sophie

distrib > Mageia > 4 > x86_64 > by-pkgid > 449bc2c52128e77c3c0d58150afb6f4e > files > 119

perl-Plack-1.2.900-2.mga4.noarch.rpm

use Plack::Builder;
use File::Basename qw(dirname);

my $handler = sub {
    return [ 404, [ "Content-Type" => "text/plain" ], [ "Not Found" ] ];
};

builder {
    enable "Plack::Middleware::ConditionalGET";
    enable "Plack::Middleware::Static",
        path => qr/./, root => dirname(__FILE__) . '/static';
    $handler;
};