今日覚えたことをメモっておけ (155レス)
上下前次1-新
抽出解除 レス栞
19(1): 名無しさん@お腹いっぱい。 02/01/03 18:43 ID:??? AAS
UNIXの練習にモジュールロードのベンチマーク作ってみた。
なくさないようにここに張らせてもらおう。
コマンドラインから
> perl ./pmbench FileHandle English
で使えた。
#!/usr/local/bin/perl
use Benchmark;
@module = ('IO::File', 'CGI', @ARGV);
$count = '2500';
foreach (@module) {
省14
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
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.006s