Get hour number from time
Download gethourfromdate.zip
Synopsis: |
| gethourfromdate.pl |
| ||
#returns 0..23
sub GetHourFromDate($)
{
my ($t) = @_;
return (localtime shift)[2];
}
#-- unit tests
sub test_gethourfromdate()
{
ut::assert(GetHourFromDate(0), 16);
ut::assert(GetHourFromDate(28799), 23);
ut::assert(GetHourFromDate(28800), 0); #28800 seconds is 8 hours
ut::assert(GetHourFromDate(1056523422), 23);
ut::assert(GetHourFromDate(1096523422), 22);
}
1;
|
| Contact me about content on this page using john_web-at-arrizza-dot-com |
| For Web Master or site problems contact: webadmin-at-arrizza-dot-com |
| Copyright John Arrizza (c) 2001,2002,2003,2004,2005,2006,2007 |