PHP语法 截取显示指定字符串中两个字符中间的内容

Posted 2023-04-06

字符格式如下:
前面不规则/?y=%u597D&m=%u554A&h=%20后面不规则
要提取 y= 到 &m= 中间的内容,就是 %u597D
最后显示时是把 %u597D 转码,用汉字显示
请高手赐教!

参考技术A <?php
function unescape($str)
$str = rawurldecode($str);
preg_match_all("/%u.4|&#x.4;|&#d+;|.+/U",$str,$r);
$ar = $r[0];
foreach($ar as $k=>$v)
if(substr($v,0,2) == "%u")
$ar[$k] = mb_convert_encoding(pack("H4",substr($v,-4)),"gb2312","UCS-2");
elseif(substr($v,0,3) == "&#x")
$ar[$k] = mb_convert_encoding(pack("H4",substr($v,3,-1)),"gb2312","UCS-2");
elseif(substr($v,0,2) == "&#")
$ar[$k] = mb_convert_encoding(pack("H4",substr($v,2,-1)),"gb2312","UCS-2");


return join("",$ar);


$str = '/?y=%u597D&m=%u554A&h=%20';
$query = parse_url($str,PHP_URL_QUERY);
parse_str($query);
echo unescape($y);
?>本回答被提问者采纳 参考技术B $str="/?y=%u597D&m=%u554A&h=%20";
$result="";
if(preg_match('#y=(.+)&m=#isU',$str,$ma))$result=unescape($ma[1]);
echo $result;
function unescape($str)
$str = rawurldecode($str);
preg_match_all("/(?:%u.4)|.+/",$str,$r);
$ar = $r[0];
foreach($ar as $k=>$v)
if(substr($v,0,2) == "%u" && strlen($v) == 6)
$ar[$k] = iconv("UCS-2","GB2312",pack("H4",substr($v,-4)));

return join("",$ar);
参考技术C 你这个应该是对url 的拆分，拆倒是能拆。不过意义不大啊

shell 如何取文本中 指定两个字符中间的内容

要取TABLE "bank".与row size中间的字符串 如下面的：cpdmdyb_ck
TABLE "bank".cpdmdyb_ck row size = 143 number of columns = 3 index size = 106
unload file name = cpdmd06141.unl number of rows = 1822

TABLE "bank".cpdmdyb_dk row size = 143 number of columns = 3 index size = 106
unload file name = cpdmd06143.unl number of rows = 12310

参考技术A sed -nr '/TABLE/s/.*"bank"\\.(.+) row.*/\\1/;p' yourfile

或者：

awk -F. '/TABLE/split($2,a," ");print a[1]' yourfile

结果都是：

cpdmdyb_ck

cpdmdyb_dk

追问

这个可以用非常感谢,第二行带.unl的怎么取出来呢，如：cpdmd06141.unl

追答

我看到你的另一个提问了，见那个回答。
用sed的N命令将TABLE "bank"的下一行也读取到模式空间内，并合并为一行（换行符\n分隔）后一起处理。

追问

你在那里面把脚本写出来嘛，我不会写，我在那边把分给你

追答

那边写出来了。这里也放一下。

sed -nr '/TABLE/N;s/.*"bank"\\.(.+) row.*\\n.*name = (.+) number.*/load from \\2 insert into \\1;/;p' file.txt

参考技术B ▶ xsel -o|perl -e '$_=<>; /bank\"\.(.*)row/; print $1;'
cpdmdyb_ck追问

文件名在那里啊

追答

cat xxxx文件名|perl -e 'while($_=) /bank\"\.(.*)row/; print $1;'

追问

我要用 TABLE "bank".与row size TABLE 加在那呢，取出来要显示为：
cpdmdyb_ck
cpdmdyb_dk
上面的命令显示在一行了如下
cpdmdyb_ck cpdmdyb_dk
帮我再改下，非常感谢
能不能把下面的cpdmd06141.unl 与cpdmdyb_ck连接起来比如：
laod from cpdmd06141.unl insert into cpdmdyb_ck

追答

最后的输出，改成这样
print "$1\n"

就是附加一个回车。

追问

执行后输出的内容中有重复记录：
ryjsb
ryjsb
khjltzb
khjltzb
khb
khb
grkhfzb
grkhfzb
khsfqrb
khsfqrb
文本中没有重复的行

追答

哦。我以为你的数据是规则的，每行都有。加一个判断就是。

cat xxxxx|perl -e 'while() if(/bank\"\.(.*)row/)print "$1\n";'