プログラミングに関して今日覚えたことをメモっておけ。
use strict;
use Data::Dumper;
use KCatch;
die Dumper($value);
MySQL-MAXだとトランザクションとロールバックが使えるみたい。
-w を使うと遅くなる。
use diagnostics だと桁違いに。
use strict はそうでもない。
use Data::Dumper;
$Data::Dumper::Indent=0;
#配列スライス
my @ary = (0..9);
@ary[5,6] = ('abc', 'def');
print Dumper(\@ary), "\n";
#ハッシュスライス
my %hash = (D=>'Develop', A=>'Alpha', B=>'Beta');
@hash{A,B} = (1,2);
print Dumper(\%hash), "\n";
if ($tgt & ~$tgt) { print 'STRING' }
else { print 'BINARY' }
うろ覚えの種類判別法。
Effective Perlあたりに書いてあったやつかな。
use Benchmark;
{ my ($t0,$t1);
BEGIN {$t0 = new Benchmark;}
END {
$t1 = new Benchmark;
open LOG, '>> ./bench.log';
my $body = timestr timediff $t1, $t0;
print LOG localtime(time)."\t$body\n";
close LOG;
}
}
実行時間のログをbench.logに記録する。
UNIXの練習にモジュールロードのベンチマーク作ってみた。
なくさないようにここに張らせてもらおう。
コマンドラインから
> perl ./pmbench FileHandle English
で使えた。
#!/usr/local/bin/perl
use Benchmark;
@module = ('IO::File', 'CGI', @ARGV);
$count = '2500';
foreach (@module) {
print "$_\n ";
timethis($count, "require $_; import $_;");
}
__END__
うちのだとこんな結果。
IO::File
timethis 2500: 4 wallclock secs ( 4.15 usr + 0.03 sys = 4.18 CPU)
CGI
timethis 2500: 1 wallclock secs ( 0.70 usr + 0.02 sys = 0.71 CPU)
FileHandle
timethis 2500: 7 wallclock secs ( 6.96 usr + 0.02 sys = 6.98 CPU)
English
timethis 2500: 12 wallclock secs (12.42 usr + 0.03 sys = 12.45 CPU)
perl 5.005_03: FreeBSD 4.4R
>>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) {
unless(eval "require $_"){
$@ =~ s/at .*?\n$//;
warn $@, "\n";
next;
}
print "$_ version ", ($_->VERSION || '(unknown)'), "\n";
timethis($count,
qq{%INC=();require $_;}
. ($opt{i} ? qq{$_->import;} : "")
);
}
__END__ >>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)
English version (unknown)
timethis 100: 6 wallclock secs ( 5.88 usr + 0.20 sys = 6.07 CPU) ×@hairetu[1]
○$hairetu[1]
||
||
||
||
=====再下降=====
まじめな質問したのに誰も答えてくれません。
とりあえずよるまで待ってみます(泣
今日覚えたこと:
スーパーでレジ打ち間違えられて200円くらい損するとこだった。
これからは、絶対レシートを確認すること。
>>84
上の方だけデジタル写真で撮りました。
+----------------------------------+
| 2ちゃんスーパー |
| アジひもの x 3 単価178 356.-- |
| 豆腐 x 2 単価98 194.-- |
| 値引き 20% -71.-- |
| 豆腐 x 2 単価98 194.-- |
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
豆腐を計算してるときに、当日の一番高い買い物から
2割引する券を出した。そいで、アジひものを2割引いた。
豆腐を打ってないと勘違いして、豆腐を2回打ったらしい。
>>85受けませんでしたね。
今日覚えたこと:
ネタにマジレスはだめぽ
後が続かんかな?
流れを読めない>>85がいるのはこのスレですか?
時間をかけて成熟させてきた流れを潰しやがって!! なんか流れ狂ってるよ。
やっぱこれが入ってないと。
それは聞き捨てならない
・Windows環境ではサイズのエンディアンが逆なので上位バイトと下位バイトを入れ替えて評価する。
・SOS(0xFF 0xDA)以降はEOI(0xFF 0xD9)が出てくるまでがデータとして扱われる模様。
・RSTmはデータ中に出現する特殊なマーカーなので、ヘッダを読むだけならSOI EOIだけに気を配ればよい。
あ 先頭1バイトだとMか。。
MZのシグネチャで始まるってことね
データが4バイトに収まらない場合はデータ部はデータのあるオフセットを示すポインタである。
これはTIFFヘッダの先頭(IIorMM)からのオフセットである。
同じ値段ならば最新廉価機よりも一つ前の上位機種の方が満足度は高い。
(コンピュータなどCPUその他のスピードのみが評価基準の場合、ふちなし印刷など魅力的な機能が搭載されている場合を除く。)
フックって案外簡単。メモリマップドファイルをカプセル化すれば便利だな。
Perlでも、CGI::Carpを使えば、実行時のエラーがちゃんとブラウザで見れる。
ええと、hello world!!って出てきた。perl。
子供が出来ると女が強気にNULL。
↓
そして『結婚しようと迫られる』(・A・)
↓
俺はしたくない( ´Д⊂
メモ:俺の後輩が高校中退した理由は彼女の妊娠が原因だった。
━―━―━―━―━―━―━―━―━[JR山崎駅(^^)]━―━―━―━―━―━―━―━―━―
>>122
漏れだけ、かも(鬱
//confをブラウザ上からいじれるようにならんかなぁ・・・誰か作ってそうだ・・ PHPは、
PHP: Homepage Program
っていう名前の方がお似合い
進化してからこっそり名前からHomepageを消すずるさは許せない
∧_∧
ピュ.ー ( ^^ ) <これからも僕を応援して下さいね(^^)。
=〔~∪ ̄ ̄〕
= ◎――◎ 山崎渉
__∧_∧_
|( ^^ )| <寝るぽ(^^)
|\⌒⌒⌒\
\ |⌒⌒⌒~| 山崎渉
~ ̄ ̄ ̄ ̄
∧_∧ ∧_∧
ピュ.ー ( ・3・) ( ^^ ) <これからも僕たちを応援して下さいね(^^)。
=〔~∪ ̄ ̄ ̄∪ ̄ ̄〕
= ◎――――――◎ 山崎渉&ぼるじょあ
(⌒V⌒)
│ ^ ^ │<これからも僕を応援して下さいね(^^)。
⊂| |つ
(_)(_) 山崎パン
∧_∧
( ・∀・) | | ガガッ
と ) | |
Y /ノ .人
/ ) .人 < >_∧∩
_/し' < >_∧∩`Д´)/
(_フ彡 V`Д´)/ / ←>>118
/ ←>>136 ★2ch勢いランキングサイトリスト★
☆ +ニュース
・ 2NN
・ 2chTimes
☆ +ニュース板新着
・ 2NN新着
・ Headline BBY
・ Unker
☆ +ニュース板他
・ Desktop2ch
・ 記者別一覧
☆ 全板
・ 全板縦断勢いランキング
・ スレッドランキング総合ランキング
☆ 実況込み
・ 2勢
・ READ2CH
・ i-ikioi
※ 要サイト名検索
誰でも簡単にネットで稼げる方法など
参考までに、
⇒ 『半藤のブブイウイウレレ』 というサイトで見ることができます。
グーグル検索⇒『半藤のブブイウイウレレ』
CWQNWGXNVR