今日覚えたことをメモっておけ (155レス)
前次1-
抽出解除 レス栞

21
(1): 名無しさん@お腹いっぱい。 02/01/05 14:26 ID:??? AAS
>>19
それだと殆どimportの時間を計るだけじゃん。
%INCをクリアしないと。

#!/usr/local/bin/perl
use Benchmark;
use Getopt::Std;
use strict;

getopts('ic:' => \my %opt);

my $count = ($opt{c} - 0) || 100;

foreach (@ARGV) {
省12
23: 名無しさん@お腹いっぱい。 02/01/05 15:20 ID:??? AAS
>>21
すっかり忘れてた。
ありがと、参考にしますわ。

pmbench -i CGI IO::File FileHandle English の結果。
CGI version 2.46
 timethis 100: 17 wallclock secs (16.85 usr + 0.59 sys = 17.44 CPU)
IO::File version 1.06021
 timethis 100: 27 wallclock secs (25.16 usr + 1.02 sys = 26.18 CPU)
FileHandle version 2.00
 timethis 100: 29 wallclock secs (27.68 usr + 0.88 sys = 28.55 CPU)
省2
前次1-
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.365s*