#!perl -lp s/(00)?$/"$1 is"." not"x!!($`%4)." a leap year."/e