Что-то у меня сильно результаты скачут.<br>Видимо тут слишком большие погрешности.<br>Несколько раз запускал вот этот код<br>use strict;<br>use warnings;<br>use Benchmark qw(:all);<br><br>my $phone = &#39;70123456789&#39;;<br>
my $vs = {<br>&nbsp;&nbsp; regex =&gt; sub {<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; if ( $phone =~ /^7/ ) { }<br>&nbsp;&nbsp; },<br>&nbsp;&nbsp; substr_eq =&gt; sub {<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; if ( substr($phone, 0, 1) eq &#39;7&#39; ) { }<br>&nbsp;&nbsp; },<br>&nbsp;&nbsp; substr =&gt; sub {<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; if ( substr($phone, 0, 1) == 7 ) { }<br>
&nbsp;&nbsp; },<br>};<br><br>print &quot;Benchmark: $Benchmark::VERSION\n&quot;;<br>print &quot;PERL: $]\n&quot;;<br>cmpthese -5, $vs;<br><br><br>Benchmark: 1.07<br>PERL: 5.008008<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Rate&nbsp;&nbsp;&nbsp;&nbsp; regex&nbsp;&nbsp;&nbsp; substr substr_eq<br>
regex&nbsp;&nbsp;&nbsp;&nbsp; 4361549/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -14%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -26%<br>substr&nbsp;&nbsp;&nbsp; 5057507/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 16%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -14%<br>substr_eq 5910398/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 36%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 17%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --<br><br><br>Benchmark: 1.07<br>PERL: 5.008008<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Rate&nbsp;&nbsp;&nbsp; substr substr_eq&nbsp;&nbsp;&nbsp;&nbsp; regex<br>
substr&nbsp;&nbsp;&nbsp; 4490439/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -8%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -11%<br>substr_eq 4855446/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 8%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -4%<br>regex&nbsp;&nbsp;&nbsp;&nbsp; 5040176/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 12%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 4%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --<br><br><br>Benchmark: 1.07<br>PERL: 5.008008<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Rate&nbsp;&nbsp;&nbsp; substr substr_eq&nbsp;&nbsp;&nbsp;&nbsp; regex<br>
substr&nbsp;&nbsp;&nbsp; 3303013/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -28%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -28%<br>substr_eq 4596273/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 39%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -0%<br>regex&nbsp;&nbsp;&nbsp;&nbsp; 4611086/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 40%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 0%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --<br><br><br>Benchmark: 1.07<br>PERL: 5.008008<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Rate&nbsp;&nbsp;&nbsp;&nbsp; regex&nbsp;&nbsp;&nbsp; substr substr_eq<br>
regex&nbsp;&nbsp;&nbsp;&nbsp; 3711242/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -5%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -21%<br>substr&nbsp;&nbsp;&nbsp; 3906712/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 5%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -17%<br>substr_eq 4701856/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 27%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 20%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --<br><br>Benchmark: 1.07<br>PERL: 5.008008<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Rate&nbsp;&nbsp;&nbsp; substr&nbsp;&nbsp;&nbsp;&nbsp; regex substr_eq<br>
substr&nbsp;&nbsp;&nbsp; 3789591/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -3%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -10%<br>regex&nbsp;&nbsp;&nbsp;&nbsp; 3915761/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 3%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -7%<br>substr_eq 4195575/s&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 11%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 7%&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; --<br><br>