>>479
正しくないw
ベンチとってみればわかるけど

A1 $_ =~ /hoge/
A2 index($_, 'hoge')

my $word = 'hoge';
B1 $_ =~ /$word/
B2 index($_, $word)

A1 A2 はほぼ同じ速さで、
B1 は B2 より速い。

index($_, $word[1]) or index($_, $word[1]) ・・・
より
/$word[0]/ or $word[1] ・・・
のが速い。

$_ が 'aaaaaaa......' で $word が 'baaaaaaaaaaaa' とかいう特殊な場合は考えないでね。