我正在尝试编写一个sed脚本,该脚本将捕获文本文件中的所有“裸”URL,并将其替换为<a href=[URL]>[URL]</a>
。 “裸”是指未包含在锚标记内的URL。
我最初的想法是,我应该匹配前面没有“或”&gt;的网址,并且在它们之后也没有&lt;或a“。然而,我在表达“不要在前面或后面”的概念时遇到了困难,因为据我所知,sed没有前瞻或后视。
示例输入:
[Beginning of File]http://foo.bar arbitrary text
http://test.com other text
<a href="http://foobar.com">http://foobar.com</a>
Nearing end of file!!! http://yahoo.com[End of File]
所需的输出样本:
[Beginning of File]<a href="http://foo.bar">http://foo.bar</a> arbitrary text
<a href="http://test.com">http://test.com</a> other text
<a href="http://foo.bar">http://foo.bar</a>
Nearing end of file!!! <a href="http://yahoo.com">http://yahoo.com</a>[End of File]
注意第三行未经修改,因为它已在<a href>
内。
另一方面,第一行和第二行都被修改。
最后,请注意所有非URL文本都是未修改的。
最终,我正在尝试做类似的事情:
sed s/[^>"](http:\/\/[^\s]\+)/<a href="\1">\1<\/a>/g 2-7-2013
我首先验证以下内容是否正确匹配并删除了一个网址:
sed 's/http:\/\/[^\s]\+//g'
然后我尝试了这个,但它无法匹配从文件/输入开始处开始的URL:
sed 's/[^\>"]http:\/\/[^\s]\+//g'
有没有办法在sed中解决这个问题,要么通过模拟lookbehind / lookahead,要么显式匹配文件的开头和文件结尾?
答案 0 :(得分:4)
sed是一个简单替换单行的优秀工具,对于任何其他文本操作问题只需使用awk。
检查我在下面的BEGIN部分中使用的定义,以获取与URL匹配的正则表达式。它适用于您的样本,但我不知道它是否捕获所有可能的URL格式。即使它没有,但它可能足以满足您的需求。
$ cat file
[Beginning of File]http://foo.bar arbitrary text
http://test.com other text
<a href="http://foobar.com">http://foobar.com</a>
Nearing end of file!!! http://yahoo.com[End of File]
$
$ awk -f tst.awk file
[Beginning of File]<a href="http://foo.bar">http://foo.bar</a> arbitrary text
<a href="http://test.com">http://test.com</a> other text
<a href="http://foobar.com">http://foobar.com</a>
Nearing end of file!!! <a href="http://yahoo.com">http://yahoo.com</a>[End of File]
$
$ cat tst.awk
BEGIN{ urlRe="http:[/][/][[:alnum:]._]+" }
{
head = ""
tail = $0
while ( match(tail,urlRe) ) {
url = substr(tail,RSTART,RLENGTH)
href = "href=\"" url "\""
if (index(tail,href) == (RSTART - 6) ) {
# this url is inside href="url" so skip processing it and the next url match.
count = 2
}
if (! (count && count--)) {
url = "<a " href ">" url "</a>"
}
head = head substr(tail,1,RSTART-1) url
tail = substr(tail,RSTART+RLENGTH)
}
print head tail
}
答案 1 :(得分:1)
您的命令显而易见的问题是
You did not escape the parenthesis "("
这是关于sed
正则表达式的奇怪之处。与Perl正则表达式不同的是,许多符号默认为“文字”。你必须将它们转移到“功能”。尝试:
s/\([^>"]\?\)\(http:\/\/[^\s]\+\)/\1<a href="\2">\2<\/a>/g