1

Нужно привести URL к виду, в котором можно оценивать равенство. Интересуют только сами URL, то, что по ним может отдаваться разный контент - отставим в сторону. Протоколы не учитываем. Якоря в ajax-страницах тоже. Пока вырисовывается:

sub unify_url
{
  my ( $url ) = @_;

  # http://test.com/#anchor => //test.com/
  my $uu = URI->new($url)->opaque();

  # у кого-то '+', у кого-то '%20'...
  $uu = uri_unescape($uu);

  $uu =~ s|/+$||;

  $uu;
}

Ничего не упустил?

5
  • Может, еще стоит имя домена привести к одному регистру и отрезать правый PATH_SEPARATOR. ps. Прошу прощения, это Perl?
    – Bars
    30 мар 2013 в 14:47
  • Ну а еще GET параметры могут быть попутаны местами. Есть смысл распарсить их, отсортировать как-то и прилепить обратно.
    – Bars
    30 мар 2013 в 14:49
  • @Bars, про мешанину в GET - да, красивая путаница может выйти :) Но на это пока забиваем. Регистр само собой, PATH_SEPARATOR отрезается в последней строчке. Да, это Perl, но принцип-то везде одинаковый будет :)
    – user6550
    30 мар 2013 в 15:05
  • Ну тогда еще можно отделить GET параметры, отрезать PATH_SEPARATOR, и прилепить GET обратно — для такого случая: ://somehost.com/path/to/?file_pointer=that/ Вроде все. Про путаницу с GET не забудь потом :)
    – Bars
    30 мар 2013 в 15:13
  • @Bars, вот спасибо! Про такие случаи "думал, но забыл" :) test.com?a=b vs test.com/?a=b
    – user6550
    30 мар 2013 в 15:20

0

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge you have read our privacy policy.