比較兩個網址

Question

我需要兩個URL在Perl比較。

網址由DOMAIN的唯一或DOMAIN /（用斜線終了根URL）是等效的。

這就是說，以下字符串應該等於數： 「http://example.com」和「http://example.com/」。

Answer 1

comparsion

To compare two URLs, use the eq() method:  
if ($url_one->eq(url_two)) { ... } 

For example: 

use URI; 
my $url_one = URI->new('http://www.example.com'); 
my $url_two = URI->new('http://www.example.com/'); 

if ($url_one->eq($url_two)) { 
    print "The two URLs are equal.\n"; 
} 
The two URLs are equal. 

Answer 2

你可以這樣做：

my $url_1 = 'http://www.example.com'; 
my $url_2 = 'http://www.example.com/'; 

if ($url_1 =~ m/\A$url_2\/\z/ || $url_2 =~ m/\A$url_1\/\z/) { 
    print "URLs are the same\n"; 
} 

嗯因爲他們是真正有效的URL。 正則表達式只檢查如果你在最後加上「/」，它仍然是相同的URL

所以如果你在$ url_1的末尾添加「/」，它會是'http：// www。 example.com/「，這將使第二個條件成爲真實。