chomp ($today = `date '+%a'`);
chomp ($d = `date '+%d'`);
chomp ($m = `date '+%m'`);
chomp ($y = `date '+%y'`);