...... grep { ...  } splice( keys(%my),0,100 ) ;