On Tue, 24 Feb 2004, Scott Walters wrote: *snip* > sub message { > my $thursdayith = $mday + 6; > my $tail = substr($thursdayith, -1, 1); > $thursdayith .= { *snip* You should change the first line of message() to this: my $thursdayith = (localtime (time() + 6*24*60*60))[3];