Gregg O'Donnell wrote:
All,
  I use this line of code:
  my $datetime = join ' ', (split ' ', localtime)[0,2,1,4,3];

my $localtime = [ split ' ', localtime ];
my $datetime = $localtime->[0] . ', ' . join ' ', @$localtime[2,1,4,3];

TMTOWTDI...

http://danconia.org

To create this result:
  Mon 9 Apr 2007 09:15:05
How can I add a comma to this result to get:
  Mon, 9 Apr 2007 09:15:05
Best and thanks,
  Gregg


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to