Re: Re: Month info from 'date'

You can skip the acrobatics altogether with:

print qw(Dec Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov)[(localtime)[
+4]]
[download]

Comment on Re: Re: Month info from 'date' Download Code

Replies are listed 'Best First'.
Re: Re: Re: Month info from 'date' by d00fuss (Novice) on Jun 25, 2001 at 19:23 UTC
Ok... here is how I ended up doing it... tell me if this looks terrible: `my $month = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec)[(local +time)[4]-1]; print "$month\n";` [download] --Neb	[reply] [d/l]