@data = map  {substr($_,3)}
        sort #lexicographical representation of the date
        map  { m!^\s*(\D*(\d+)/(\d+)/(\d+)(?: [\d.]+)*)\s*$!
               && pack ("CCCA*",$4,$2,$3,$1)}
        @idata;