$today_tmp = DateTime->now();
$tomorrow_tmp = DateTime->now()->add( days => 1 );
$yesterday_tmp = DateTime->now()->subtract( days => 1 );
$today = $today_tmp->mdy('/');
$tomorrow = $tomorrow_tmp->mdy('/');
$yesterday = $yesterday_tmp->mdy('/');
print "Today: $today -=- ";
print "Tomorrow: $tomorrow -=- ";
print "Yesterday: $yesterday -=- ";