$[ localization not needed with modern perl