Date format

[cc96ai]

I want to change the date format in perl script

input: "2005-11-01"
output:November 1, 2005

thanks

 

[Gunnar Hjalmarsson]

I want to change the date format in perl script

input: "2005-11-01"
output:November 1, 2005

The POSIX::strftime() function may be helpful.

 

[Carl]

I want to change the date format in perl script

input: "2005-11-01"
output:November 1, 2005

thanks

You might be interested in the Date::Simple module:

--example--
$ cat test.pl
#!/usr/bin/perl

use strict;
use warnings;

use Date::Simple qw/date/;

my $d = date('2005-11-01');
print $d->format('%B %d, %Y'), "\n";

__END__

$ ./test.pl
November 01, 2005
$
--end example--

See:
http://search.cpan.org/dist/Date-Simple/lib/Date/Simple.pm

Hope that helps,
Carl.

 

[Gunnar Hjalmarsson]

use Date:arse qw/ strptime /;
use POSIX qw/ strftime /;

# output:November 1, 2005
my $date = "2005-11-01";

my(undef,undef,undef,$day,$month,$year) = strptime $date;
print strftime("%B %e, %Y\n", 0, 0, 0, $day, $month, $year);

Or shorter:

print strftime("%B %d, %Y\n", 0, 0, 0, (strptime $date)[3..5]);

(%d is a more portable specifier than %e. The latter does not work on my
Windows XP box.)

 

[cartercc]

I want to change the date format in perl script

input: "2005-11-01"
output:November 1, 2005

thanks

If you want to roll your own, do this:

%months = (
1 => "January",
2 => "February",
3 => "March",
etc )

@input = split /-/, $input;
printf "%s $d, $d", $months{$input[1]}, $input[2], $input[0];

CC