function time2secs ( $str )
        {
#-k     datetime math
#-      hh:mm:ss (string) to secs(int)
#-s     See also: dateDiff dateRange formatTime secondsToInterval since date

        $secs = substr($str,0,2)*3600 + substr($str,3,2)*60 + substr($str,6,2);
        return $secs;
        }

?>