use POSIX;print+strftime"%A 
",(1)x5,$_ for-3..3