Rebol url？函数没有真正检测到网址？

Question

我想阅读剪贴板，如果它是一个网址做一些东西。问题是网址？没有做这样的工作：

url? to-url "any string" will return true 

这是正常的吗？那么我该怎么做我想要的检测？

Answer 1

to-url将字符串转换为URL的REBOL数据类型！

你想要的是检测一个字符串是否符合URL的规则。这也不是容易还是傻瓜证明许多字符串可以在现实世界中的网址，例如：

• http://xxx
• ftp://xxx

• 断枝

• 的cgi-bin/script.php的

如果你想捕捉的更常见的情况下（如那些以HTTP：//开头，https：//等），然后考虑使用解析。

这个脚本几乎没有工作： link text

它所缺少的是一些字符集定义（我认为必须对代码已匆匆从别的地方cut'n'pasted）....

alpha: charset [#"a" - #"z" #"A" - #"Z"] 
digits: charset [#"0" - #"9"] 
alphadigit: union alpha digits 

...以及如何使用它的一个例子：假设你在本地保存为uri.r：

url-parse: do %uri.r 
parse "http://sss" parse-url/url 
== true 
parse "sss" parse-url/url 
== false 

Answer 2

您可以使用：

url? load "any://string"` 

或

url? attempt [load "any string"] 

使用URL的REBOL的定义。