sub split_array_in_two { ([splice @_, @_/2], \@_)[1,0] }