Fix Plack::Handler::FCGI issues with nginx PATH_INFO

FixFCGIPath.pm

package Plack::Middleware::FixFCGIPath;

use strict;
use warnings;
use base qw/ Plack::Middleware /;

sub call {
    my ($self, $env) = @_;
    if (length($env->{PATH_INFO})) {
        $env->{PATH_INFO} = '/' . $env->{PATH_INFO}
            unless $env->{PATH_INFO} =~ m{^/};
    }
    return $self->app->($env);
}

1;