Question

我正在尝试编写一个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，要么显式匹配文件的开头和文件结尾？

Answer 1

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
}

Answer 2

您的命令显而易见的问题是

You did not escape the parenthesis "("

这是关于sed正则表达式的奇怪之处。与Perl正则表达式不同的是，许多符号默认为“文字”。你必须将它们转移到“功能”。尝试：

s/\([^>"]\?\)\(http:\/\/[^\s]\+\)/\1<a href="\2">\2<\/a>/g

sed正则表达式可以模拟lookbehind和lookahead吗？

2 个答案: