#!perl -p
s/00$|$/@{[$&,is,$_%"4$&"?'not a':a,leap,year]}./