WaBis

walter.bislins.ch

Test1: RegExp lokal in Funktion

Bei diesem Test wird die Funktion test1 1 Sekunde lang so oft wie möglich aufgerufen und daraus die durchschnittliche Zeit für einen Funktionsaufruf berechnet.

In dieser Variante des Test wird bei jedem Aufruf von test1 ein neues RegExp-Objekt erzeugt.

const LONGSTR1 = "..."
const LONGSTR2 = "..."

const PATTERN = "([^\wäöüÄÖÜßçàáâèéêôûÁÀÂÉÈÊÔÛ\x01])"

sub test1()
  dim re, r
  set re = new RegExp
  re.Multiline = false
  re.IgnoreCase = bIgnoreCase
  re.Global = false
  re.Pattern = PATTERN
  r = re.Test(LONGSTR1)
  r = re.Test(LONGSTR2)
end sub

Resultat

  • Calls per sec = 6665
  • Time per call = 150.037509377344 μs
More Page Infos / Sitemap
Created Freitag, 28. August 2009
Scroll to Top of Page
Changed Montag, 23. Juni 2014