Top/Blog/2004-11-30

2004-11-30 の変更点

• 追加された行はこの色です。
• 削除された行はこの色です。
• Blog/2004-11-30 へ行く。

**&tag(Devel);Perlを最適化する [#if238b58e]

[[Perlを最適化する>http://www-6.ibm.com/jp/developerworks/linux/041119/j_l-optperl.html]] (via [[オレンジニュース>http://secure.ddo.jp/~kaku/tdiary/]])
>
+ダブルクォートのみ
 print "A stringanother string\n";
+ピリオドで連結
 print 'A string'.'another string'."\n";
+列挙
 print 'A string','another string',"\n";
<
>
場合によっては((連結する文字列が長い場合？))、3が一番早いらしい。
+ダブルクォートのみ
 foreach my $count (0..100000)
 {
   $another_string = 10000 x chr($count % 26 + 65);
   print "A string$another_string\n";
 }
+ピリオドで連結
 foreach my $count (0..100000)
 {
   $another_string = 10000 x chr($count % 26 + 65);
   print 'A string'.$another_string."\n";
 }
+列挙
 foreach my $count (0..100000)
 {
   $another_string = 10000 x chr($count % 26 + 65);
   print 'A string',$another_string,"\n";
 }




#blognavi(Blog)