F5 Transaction ID

tid.tcl

when HTTP_REQUEST {
        # Initialize the hex string variable
        set hex ""

        # Loop to create 8 random bytes
        for {set i 0} {$i<8} {incr i} {

            # Create a byte from the PRNG
            set byte [expr { int(rand() * 256) }]

            # Append the formatted byte to the hex string
            append hex [format %x $byte]
        }
        
        HTTP::header replace X-Transaction $hex
}

Hey bro, there's no pow or floor functions in your F5...

Fixed