博客
关于我
强烈建议你试试无所不能的chatGPT,快点击我
利用perl提取web配置文件中的域名对应的路径
阅读量:6410 次
发布时间:2019-06-23

本文共 789 字,大约阅读时间需要 2 分钟。

server 

                { 

                                listen        80; 

                                server_name www.mcshell.org mcshell.org; 

                                index    index.php index.html index.htm; 

                                root    /data0/web/mcshell; 

                                error_page 404 =http://www.mcshell.org; 

if (!-f $request_filename){ 

set $rule_0 1$rule_0; 


if (!-d $request_filename){ 

set $rule_0 2$rule_0; 


if ($rule_0 = "21"){ 

rewrite ^/(.*)\?*$ /index.php?_route_=$1 last; 



if ($host != 'www.mcshell.org' ) { 

rewrite ^/(.*)$ http://www.mcshell.org/$1 permanent; 


.. 

..
现在要求提取出   mcshell.org    /data0/mcshell
这样的对应方式
代码如下
#!/usr/bin/perl 

while(<>){ 

chomp; 

if(/server_name\s(.*);/){ 

print "$1\t"; 

$paths=<>; 

(undef,undef,undef,undef,$server )= split /\s+/,$paths; #填充不需要的行 

$pathss=<>; 


(undef,undef,$servers )= split /\s+/,$pathss; 


print "$servers\n"; 



本文转自 mcshell 51CTO博客,原文链接:http://blog.51cto.com/mcshell/480852,如需转载请自行联系原作者
你可能感兴趣的文章
WPF 虚拟键盘
查看>>
储存卡无法打开专家教您怎么数据恢复
查看>>
彼得原理
查看>>
如何利用【百度地图API】,制作房产酒店地图?(下)——结合自己的数据库...
查看>>
[20171113]修改表结构删除列相关问题3.txt
查看>>
特征选择
查看>>
在Winform程序中设置管理员权限及为用户组添加写入权限
查看>>
RTMP直播到FMS中的AAC音频直播
查看>>
多能互补提速 加快我国能源转型和现代能源体系建设
查看>>
B2G编译前的准备
查看>>
Android 二次打包(封装)AAR实用指南
查看>>
java异常中throw和throws的区别
查看>>
【快速入门ORM框架之Dapper】大牛勿进系列
查看>>
redux 简介
查看>>
阿里云OSS工具类
查看>>
nginx用户认证配置( Basic HTTP authentication)及认证原理和实现
查看>>
书籍推荐?来几本吧
查看>>
JS获得页面某一元素的位置
查看>>
SPI模式下CKE,CKP的设置
查看>>
C语言文件操作解析(三)
查看>>