Forum Webscript.Ru

Разное => Флейм => Тема начата: Green Kakadu от 10 Ноября 2004, 17:09:21

Название: гордюсь собой, perl forever!
Отправлено: Green Kakadu от 10 Ноября 2004, 17:09:21

в муках родил сегодня сортировку массива хешей по полю маркировки (та продукты маркируются типа 1.1 1.2 или 6.0):

Код: [Выделить]

@product_data = map {$_->[2]} sort {$a->[0]<=>$b->[0]||$a->[1]<=>$b->[1]} map {[split(/\\./,$_->{\'product_mark\'}),$_]} @product_data;
правда :) открыл потом PerlCookBook и увидел нечто похожее
:super:  Perl рулит! в общем, не могу не похвастаться