perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"