Shell Programming and Scripting

echo "Enter date ([YY]YY-MM-DD) : "
read DD
# choose from one of the lines below
date --date $DD +%A # DOW complete
date --date $DD +%a # DOW abreviated
date --date $DD +%u # DOW (1..7) 1 is monday
date --date $DD +%w # DOW (0..6) 0 is sunday

YEAR=2009
MM=11
DD=02
DOW=$(perl -e 'use Time::Local;
       @abbr = qw( Sun Mon Tue Wed Thu Fri Sat );
       $DATE = timelocal(0, 0, 0, $ARGV[2], $ARGV[1]-1, $ARGV[0]-1900);
       $DAY = (localtime $DATE)[6];
       print "$abbr[$DAY]\n";' $YEAR $MM $DD)
echo Day of week is: $DOW