do year = 2010 to 2030 d = .DateTime~new(year, 6, 30) if d~weeksInYear \= 52 then say year":" d~weeksinYear -- 2015: 53, 2020: 53, 2026: 53 end