func time_from_ww_log_line(sin) s = sin token,s,t,s token,s,h,s ;time, maybe with a T prefix ;look for the time in h h=' '+h ;need this often ih1=strpos(h,':') ;get first colon ih2=ih1+5 ih1=ih1-2 if (h(ih1) ne '1' and h(ih1) ne '2') then { h=bmap(h) h(ih1)=32 h=smap(h) } ih3=strpos(h,'.') ;get dot ;check hq=fix(h(ih1:ih1+1)) mq=fix(h((ih1+3):(ih3-1))) sq=fix(h((ih3+1):*)) tod=(hq*3600+mq*60+sq) return, tod endfunc