Shell Programming and Scripting

awk '
    {
        split( $4, a, ":" )
          #base = sprintf( "%s %s %s %s:%s", substr( $1, 2), $2, $3, a[1], a[2] ); # by minute
        base = sprintf( "%s %s %s %s", substr( $1, 2), $2, $3, a[1] );              # by hour
        if( !seen[base]++ )
        {
            order[++oidx] = base;
            #time[base] = sprintf( "%s:%s", a[1], a[2] );   # if by minute
            time[base] = sprintf( "%s", a[1] );             # if by hour
        }
        count[base " " $NF]++;
    }

    END {
        for( i = 1; i <= oidx; i++ )
            printf( "%s:00:00-%s:59:59 Success: %d  Fail: %d\n", order[i], time[order[i]], count[order[i] " Success"], count[order[i] " Fail"] );
            #printf( "%s:00-%s:59 Success: %d  Fail: %d\n", order[i], time[order[i]], count[order[i] " Success"], count[order[i] " Fail"] );
    }

' input-file