@sorted = map { get_original_data($_) } sort { ... } map { transform_data($_) } @original;