sub f { #234567890#234567890#234567890#234567890#234567890#234567890 use Time::Local;(gmtime timegm 0,0,0,25,11,-1900+pop)[6] }