$_ = [splice @array, 0, 2] for $test{shift @array};