perl -pne 's/eintrag([\s]*)=([\s]*)([\d]+)[\s]*$/eintrag\1=\2XXXXX/' perl -pne 's/eintrag([\s]*)=([\s]*)([\d]+)[\s]*(#.*)$/eintrag\1=\2XXXXX\4/'