予約特典(￥5,338)でUpgradeを購入した、Parallels Desktop 3.0 for Macをインストールしてみました。 以前から問題のUSBを使った携帯とのデータやり取りは今回もダメでしたが、2.X では動かなかった、昔買った大好きな写真家「内藤忠行」さんのメディアミッ…

Perl でコードを書いていると if ($s =~ /s/) などと書いてしまうが、これなら if (index($s, 'p') >=0) の方が早そうです。どれくらい速度が違うのか計ってみました。 #!/usr/bin/perl use strict; use Time::HiRes qw(gettimeofday); my $n = 100000; my $…