使用Plack应用程序与反向代理-Plack：：中间件：：Debug
编辑了这个问题。我有一个简单的Plack app.psgi
my $app = sub {
my $env = shift;
return [
200,
['Content-Type' => 'text/html'],
[ "<html><head><title>x</title></head><body><pre>Path info: $env->{PATH_INFO}</pre></body></html>"],
];
};
use Plack::Builder;
builder {
enable 'Debug';
$app;
};使用一个简单的plackup运行它。
当从本地机器访问：http://localhost:5000/some/path时，它打印：Path info: /some/path，并获得了一个工作良好的Plack调试面板。
现在，我已经将apache:80配置为：
ProxyPass /myapp/ http://127.0.0.1:5000/
ProxyPassReverse /myapp/ http://127.0.0.1:5000/所以，所有的请求：http://SITE/myapp/被代理到上面的Plack应用程序。所以，当尝试访问它时
http://SITE/myapp/some/path浏览器再次正确地打印：
Path info: /some/path但是“Plack：：中间件/调试”不起作用，因为他将下一个URL发送到浏览器：
jquery.js -> /debug_toolbar/jquery.js
toolbar.min.js -> /debug_toolbar/toolbar.min.js当然，它们并不存在。(他们应该是/myapp/debug_toolbar/....)
所以问题是：
- 我需要做的-如何改变上面的app.psgi得到一个工作的应用程序？
- 我需要
somewhat用前缀/myapp/更改所有传出的URL
回答 1
Stack Overflow用户
发布于 2013-10-17 10:02:22
更新：我想您所需要的只是添加以下内容
enable "ReverseProxy"; ## Plack::Middleware::ReverseProxy
enable "ReverseProxyPath"; ## Plack::Middleware::ReverseProxyPath 更新：您可能还需要编辑apache以向proxypass添加nocanon。
below*is*original**response
它不是硬编码的，你自己看(，我不得不去)
https://github.com/plack/Plack/wiki/How-to-detect-reverse-proxy-and-SSL-frontend http://p3rl.org/Plack::Middleware::ReverseProxy http://advent.plackperl.org/2009/12/day-12-maps-multiple-apps-with-mount-and-urlmap.html
#!/usr/bin/perl --
#~ plack-debug-mounted.pl
#~ 2013-10-17-02:59:26
#~
## perltidy -olq -csc -csci=10 -cscl="sub : BEGIN END if " -otr -opr -ce -nibc -i=4 -pt=0 "-nsak=*"
#!/usr/bin/perl --
use CGI();
use Data::Dump qw/ dd pp /;
use Path::Tiny qw/ path /;
use Plack::Builder;
use Plack::Runner;
my $selfsourceapp = sub {
return [
'200',
[ 'Content-Type' => 'text/plain', ],
[ path( __FILE__ )->slurp_raw ],
];
};
my $dumperapp = sub {
my $q = CGI->new( $_[0] );
return [
'200', [
'Content-Type' => 'text/html',
'Content-Length' => '2',
], [
$q->start_html( -title => 'dumpenv.psgi' ),
$q->h1( $_[0]->{SCRIPT_NAME} ),
$q->Dump, $q->end_html,
],
];
};
my $indexapp = sub {
return [
'200',
[ 'Content-Type' => 'text/html', ],
[
q{<doctype html>
<html lang="en-US" charset="UTF-8">
<title> Plack perlology </title>
<body>
<p> A Plack::Middleware::Debug free zone
<br> <a href="/"> this </a>
<br> <a href="/dumpenv"> dupenv </a>
<br> <a href="/selfsrc"> selfsrc </a>
<p> Get <c>Plack::Middleware::Debug</c> <b> ed </b>
<br> <a href="/debugged/"> /debugged/ this </a>
<br> <a href="/debugged/dumpenv"> /debugged/dupenv </a>
<br> <a href="/debugged/selfsrc"> /debugged/selfsrc </a>
<p> Come get some
<br> <a href="/debugged/debug_toolbar/toolbar.min.css">
/debugged/debug_toolbar/toolbar.min.css
</a>
<br> <a href="/debugged/debug_toolbar/toolbar.min.js">
/debugged/debug_toolbar/toolbar.min.js
</a>
<p> Cant get this
<br> <a href="/debug_toolbar/toolbar.min.css">
/debug_toolbar/toolbar.min.css
</a>
<br> <a href="/toolbar.min.css">
/toolbar.min.css
</a>
</body><!-- before this Plack::Middleware::Debug inserts, viewsource!! -->
}
],
];
};
my $finalapp = builder {
mount '/debugged' => builder {
enable 'Debug', panels => [
qw/
Timer
Response
Environment
Session
Parameters
/
];
mount "/dumpenv" => $dumperapp;
mount "/selfsrc" => $selfsourceapp;
mount "/" => $indexapp;
};
mount "/dumpenv" => $dumperapp;
mount "/selfsrc" => $selfsourceapp;
mount "/" => $indexapp;
};
my $runner = Plack::Runner->new;
$runner->parse_options( qw' --host 127.0.0.1 --port 80 ' );
$runner->run( $finalapp );https://stackoverflow.com/questions/19178044
复制相似问题
腾讯云开发者
Copyright © 2013 - 2026 Tencent Cloud. All Rights Reserved. 腾讯云 版权所有
深圳市腾讯计算机系统有限公司 ICP备案/许可证号：粤B2-20090059 
粤公网安备44030502008569号
腾讯云计算（北京）有限责任公司 京ICP证150476号 | 京ICP备11018762号