24 hour to 12 hour using DateTime

htmanning has asked for the wisdom of the Perl Monks concerning the following question:

Monks, I'm using this:

use DateTime qw( );
my $dt = DateTime->now( time_zone => 'Pacific/Honolulu' );
my $dateadded_time = $dt->strftime("%k:%M");
my $dateadded_date = $dt->strftime("%b %e, %Y");
[download]

The problem is %k shows up as 24 time. I'm having trouble figuring out how to get this back to 12 hour time if the hour is more than 12. Thanks!

Comment on 24 hour to 12 hour using DateTime Download Code

Replies are listed 'Best First'.
Re: 24 hour to 12 hour using DateTime by kennethk (Abbot) on Aug 01, 2014 at 05:05 UTC
As documented in the strftime Patterns section of DateTime, 12-hour time (without a leading zero) corresponds to `%l`, so `my $dateadded_time = $dt->strftime("%l:%M");` [download] or possibly `my $dateadded_time = $dt->strftime("%l:%M %P");` [download] #11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.	[reply] [d/l] [select]
Re^2: 24 hour to 12 hour using DateTime by htmanning (Friar) on Aug 01, 2014 at 08:30 UTC
Thank you so much!	[reply]