@result= sort {$order{$a->[0]} <=> $order{$b->[0]}} @connections;