while () { s/size="10">##ili(\d{1,2})/size="10" text-anchor="end">##ili$1/g; print; } __DATA__ size="10">##ili7 size="10">##ili56 size="10">##iliad