http://www.perlmonks.org?node_id=427087


in reply to getting day of the week

use Time::Piece; print localtime->wdayname;