kainwinterheart
18.09.2012 12:59 work70356D82
my $aid = sub{ shift → something() → id() };
() = sort{ assert( ( 0 == ( $aid → ( $a ) <=> $aid → ( $b ) ) ), 'Bad pair' ) } @objects;
add comment
recommend
bookmark
subscribe