How do i find the number of occurance of one string in a txt file

[DirtDBaK 0]

How do i find the number of occurance of one string in a txt file

like this

I am really really fat... and you are really really whatever...

and this would return the rusult for 'really' as 4 or the result of '.' as 6

I was thinking

$num_of_occ = _StringOcc(  'I am really really fat... and you are really really whatever...', 'really' )
  
  
  Func _StringOcc( $txt, $string )
  $i = 1
  $val = StringinStr( $txt, $string, 0, $i )
  While $val <> 0
  $i = $i + 1
  $val = StringinStr( $txt, $string, 0, $i )
  Wend
  Return $val
  EndFunc

[SmOke_N 193]

Func _StrOccur($sString, $sFind)
    StringReplace($sString, $sFind, "")
    Return @extended
EndFunc

[DirtDBaK 0]

ok thanks ill try this out