|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/371.32 06 Dec 2000 13:06:38 To : News Subject : Re: Sorting... -------------------------------------------------------------------------------- В твоём письме от Tue, 05 Dec 2000 11:25:00 +0300 написано: niar> Хранятся в файле страницы в виде: niar> niar> 123|http://my.site.com niar> 32|http://my.site2.ru niar> 87345|http://you.site.net Утверждение неверно. То, что написано, не является страницами. И даже урлами. niar> Потом они занисятся в массив (@mas = <DATA>) niar> Как правильно сделать сортировку по страницам (по алфавиту), если возможно niar> два варианта: niar> http://www.my.site.com и http://my.site.com niar> А при сортировке они должны стоять рядом. Как правильно отсортировать? map { m#http://(?:www\.)?(.+)# or die "$_ не содержит http url"; $_ = [$1,$_] } @mas; @mas = sort { $a->[0] cmp $b->[0] } @mas; Комментарии в perldoc -f map, perldoc -f sort, perldoc perlre и даже не помню чем, где нормально описаны алиасы. Advanced Perl Programming, наверное. --- slrn/0.9.6.3-as (Linux) * Origin: AKA с подствольным плюсомётом (2:5020/371.32) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/7299153670814.html, оценка из 5, голосов 10
|