use strict; my ($day, $month) = ( localtime() )[3..4]; $month++; print $month.'-'.$day; [download]
In reply to Re: The day of today by olus in thread The day of today by gtrain