So wie das im Moment is, is der Benchmark ziemlich überflüssig, weil regex1 und substr nicht funktionieren so...

Das substr bei "substr" *~* sollte besser so ausschaun: substr($line,3,index($line,' ',4)-3)
Und "regex1" findet immer nur die erste Ziffer, wegen \d+?... das Fragezeichen gehört da einfach weg, damit das "+" wieder greedy is...

Trotzdem ist und bleibt die substr-Version natürlich die deutlich schnellere, bei mir ca. 3 bis 4-fach so schnell...