检查URL是否在Perl中的域名后面有任何内容

Question

我正在尝试将仅包含域名（例如www.domain.com或otherdomain.com\）的任何网址与正则表达式进行匹配。因此domain.com或domain.com/应该匹配，但domain.com/index不应该匹配。

我试过这个：

^://[^/]*(/)?$

但它似乎不起作用。我怎么能这样做？

Answer 1

/^(?:https?://)?[^/]*(/)?$/i

试试这个。见demo

Answer 2

$ printf '%s\n' domain.com/index sub.domain.com/ domain.com |
    perl -lne 'm|/\w+| or print'
sub.domain.com/
domain.com