Sophie

• Search
• Distribution
• Explorer
• Source & Patches
• Chat
• Help
• About

distrib > Mageia > 6 > x86_64 > media > core-updates > by-pkgid > 8952bf99e053a3f2fd32087e96266c63 > files > 111

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

• Info
• Deps
• Files
• Scripts
• ChangeLog
• Location
• Others versions
• Analyse

use File::Basename;
my $path = $ENV{PSGI_IMAGE_FILE} || dirname(__FILE__) . "/../../share/baybridge.jpg";
my $handler = sub {
    open my $fh, "<:raw", $path or die $!;
    return [ 200, [ "Content-Type" => "image/jpeg", "X-Sendfile" => $path, "Content-Length" => -s $fh ], $fh ];
};