get-post-len.pl
来自「带mod_cache的lighttpd服务器,性能有很大提高,可以让一个1G带宽」· PL 代码 · 共 16 行
PL
16 行
#!/usr/bin/perlprint "Content-Type: text/plain\r\n\r\n";if ($ENV{"REQUEST_METHOD"} eq "POST") { my $l = 0; while(<>) { $l += length($_); } print $l;} else { print "0";}
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?