awk ' BEGIN { 
split("31,28,31,30,31,30,31,31,30,31,30,31",dm,",")
split("'"$1"'",k,"/")

d=k[1] + "'"$2"'" + 0
m=k[2]
y=k[3]
for (i=0; i<7;i++)
{
d2=d
m2=m+0
y2=y
if(d2>dm[m2])
{
	d2 -=dm[m2]
	m2++
	if (m2==13)
	{
		y2++
		m2=1
	}
}
d++
if(m==2 && d==24) d2--
printf "%.2d/%.2d/%d\n" ,d2,m2,y2
}

} '

