use Date::Simple qw(today); my $yesterday = today() - 1; print $yesterday->format("%B %d"); [download]
In reply to Re: Yesterday date by mojodaddy in thread Yesterday date by Anonymous Monk