さらに些細な違いで。
幼稚な実験、パート4(笑)
main
#/usr/bin/perl -wuse Time::HiRes;
my $checkTimes = $ARGV[1] =~ /^[0-9]+$/ ? $ARGV[1] : 100;
my $timecheck = Time::HiRes::time;
my $allData = "";
my %hashData = (
"a" => 1,
"b" => 2,
"c" => 3,
"d" => 4,
"e" => 5
);
for (1..$checkTimes) {
実験パターン
}
print Time::HiRes::time - $timecheck."\n";
exit;
パターン1
$allData .= "$hashData{c}\n";
パターン2
$allData .= $hashData{c}."\n";
パターン3
$allData .= $hashData{'c'}."\n";
これを$checkTimesを100にして
交互に呼び出すのを100回やって平均値を出したら…
■パターン1
0.000171947
■パターン2
0.000175407
■パターン3
0.000175407
…結果、パターン1が速かったのでした。
へぇ….(ドット)で繋げたりすると、わずかに時間くうのかしら?
本当はハッシュのキー名を、シングルクォーテーションでくくった場合と
そうでない場合の違いを測定しようかと思ったら
そこは全く同じ数値になってしもた。