Help for this page
#!/usr/bin/perl -Tw ... $hour += 24 unless int($hour/12); return $hour; }
Today: 24hours. Sun: 25hours.