/.\D+(\d)+$/,$_.=-$1-$&,print//,$"for(<>)x100