How to count a letter in a string by irules?

when CLIENT_ACCEPTED {
    set NEEDLE "a"
    set HAYSTACK "ababab"
    set NUMBER [llength [regexp -all -inline (?=$NEEDLE) $HAYSTACK]]
    log local0. "Number of instances of a found: $NUMBER"
}