トップページ⇒php
146コメント24KB

今日覚えたことをメモっておけ

■ このスレッドは過去ログ倉庫に格納されています
0001能無しさん＠お腹いっぱい01/10/19 19:58ID:???
プログラミングに関して今日覚えたことをメモっておけ。
0002名無しさん＠お腹いっぱい。01/10/19 20:27ID:???
終了
0003名無しさん＠お腹いっぱい。01/10/19 20:40ID:???
>>1さん、分かりました。
0004名無しさん＠お腹いっぱい。01/10/19 21:17ID:OVqw2yVJ
1が厨房だってことを覚えた
0005名無しさん＠お腹いっぱい。01/10/19 22:08ID:heTMfKdh

カノジョのｵﾊﾟｰｲは92cmだった・・・
0006名無しさん＠お腹いっぱい。01/10/19 22:15ID:???
それは聞き捨てならんな。
0007名無しさん＠お腹いっぱい。01/10/21 00:32ID:???
１さん、今日は何を教えてくれるのですか？
0008名無しさん＠お腹いっぱい。01/10/21 13:31ID:???
>>5
証拠写真きぼん
0009名無しさん＠お腹いっぱい。01/10/22 23:51ID:???
>>8
禿同追加願
0010名無しさん＠お腹いっぱい。01/11/11 01:40ID:???
use strict;
use Data::Dumper;
use KCatch;

die Dumper($value);
0011WEB-DB01/11/14 14:28ID:???
MySQL-MAXだとトランザクションとロールバックが使えるみたい。
0012てすと01/11/15 11:31ID:???
test
0013名無しさん＠お腹いっぱい。01/11/15 21:02ID:???
ログインできないときはCapsLockをチェック
0014【Perl】01/11/15 23:04ID:???
-w を使うと遅くなる。
use diagnostics だと桁違いに。
use strict はそうでもない。
0015【Perl】01/11/19 06:09ID:???
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";
0016【Perl】01/11/19 12:58ID:???
Perl Lib
http://bulknews.net/lib/
OOP，DB，mod_perl他

http://bulknews.net/lib/columns/00_bulknews/column.html
http://bulknews.net/lib/doc-ja/etoys.ja.html
http://bulknews.net/lib/archives/Filter-Pyuuta-0.01.html
0017【Perl】01/12/21 01:39ID:???
if ($tgt & ~$tgt) { print 'STRING' }
else { print 'BINARY' }

うろ覚えの種類判別法。
Effective Perlあたりに書いてあったやつかな。
0018名無しさん＠お腹いっぱい。01/12/27 03:05ID:???
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に記録する。
0019名無しさん＠お腹いっぱい。02/01/03 18:43ID:???
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
0020名無しさん＠お腹いっぱい。02/01/05 12:46ID:???
>>5-9
笑った。
0021名無しさん＠お腹いっぱい。02/01/05 14:26ID:???
>>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__
0022名無しさん＠お腹いっぱい。02/01/05 15:19ID:???
おちんちんをいぢるとなんだかきもちいい
0023名無しさん＠お腹いっぱい。02/01/05 15:20ID:???
>>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)
0024名無しさん＠お腹いっぱい。02/01/05 17:24ID:KwMybqpF
俺の彼女は処女だった・・・
0025名無しさん＠お腹いっぱい。02/01/05 17:46ID:???
それは聞き捨てならんな。
0026名無しさん＠お腹いっぱい。02/01/05 21:01ID:???
１さん、今日は何を教えてくれるのですか？
0027名無しさん＠お腹いっぱい。02/01/05 22:42ID:???
>>24
証拠写真きぼん
0028名無しさん＠お腹いっぱい。02/01/05 23:00ID:???
>>27
禿同追加願
0029名無しさん＠お腹いっぱい。02/01/05 23:32ID:???
×@hairetu[1]
○$hairetu[1]
0030名無しさん＠お腹いっぱい。02/01/06 00:26ID:???
PHPで文字列の結合は「.」
0031名無しさん＠お腹いっぱい。02/01/06 00:36ID:???
>>22
証拠写真きぼんぬ
0032名無しさん＠お腹いっぱい。02/01/06 00:45ID:???
>>31
それはいらない。
00332202/01/06 02:14ID:???
もうだめぽ
0034名無しさん＠お腹いっぱい。02/01/06 06:00ID:???
らくだ本売り切れてた・・・
0035　02/01/09 01:05ID:???
それは聞き捨てならんな。
0036名無しさん＠お腹いっぱい。02/01/10 13:56ID:???
海面浮上。
0037名無しさん＠お腹いっぱい。02/01/10 15:23ID:???
おにゃにょこのからだはやはらかい
0038名無しさん＠お腹いっぱい。02/01/10 17:00ID:???
それは聞き捨てならんな。
0039名無しさん＠お腹いっぱい。02/01/10 18:05ID:???
１さん、今日は何を教えてくれるのですか？
0040名無しさん＠お腹いっぱい。02/01/10 18:05ID:???
>>39
心霊写真きぼんぬ。
0041名無しさん＠お腹いっぱい。02/01/10 18:09ID:???
>>40
禿同追加祓
0042名無しさん＠お腹いっぱい。02/01/12 04:41ID:???
あげ
0043名無しさん＠お腹いっぱい。02/01/12 22:27ID:???
いちいち上げんな。
0044名無しさん＠お腹いっぱい。02/01/12 22:32ID:???
それは聞き捨てならんな。
0045名無しさん＠お腹いっぱい。02/01/13 16:13ID:???
　　　　　 ｜｜
　　　　　 ｜｜
　　　　　 ｜｜
　　　　　 ｜｜
＝＝＝＝＝再下降＝＝＝＝＝
0046名無しさん＠お腹いっぱい。02/01/23 15:24ID:Gdq9JiCf
まじめな質問したのに誰も答えてくれません。
とりあえずよるまで待ってみます（泣
0047名無しさん＠お腹いっぱい。02/01/23 15:34ID:???
>46　どこのスレ？
0048名無しさん＠お腹いっぱい。02/01/23 15:35ID:Gdq9JiCf
>47
スクリプト改造工房 Part3
http://pc.2ch.net/test/read.cgi/php/988808396/765
です・・・ﾍﾟｺﾘ
0049名無しさん＠お腹いっぱい。 02/03/14 15:21ID:???
それは聞き捨てならんな。
0050nobodyさん02/03/14 16:31ID:???
１さん、今日は何を教えてくれるのですか？
0051nobodyさん02/07/11 19:32ID:???
>>48
証拠写真きぼん
0052nobodyさん02/07/12 12:59ID:???
>>51
禿同追加也
0053nobodyさん02/07/15 17:12ID:???
今日はカツを食ったぞ。
0054nobodyさん02/07/16 14:36ID:???
それは聞き捨てならんな。
0055nobodyさん02/07/17 18:56ID:???
１さん、今日は何を教えてくれるのですか？
0056nobodyさん02/07/18 08:34ID:???
>>53
証拠写真希望。
0057nobodyさん02/07/19 20:26ID:???
>>56
禿禿同同追加願
0058nobodyさん02/07/22 06:49ID:???
トイレ行きたい。
0059nobodyさん02/07/23 12:49ID:???
それは聞き捨てならんな。
0060nobodyさん02/07/24 08:39ID:???
１さん、今日は何を教えてくれるのですか？
0061nobodyさん02/07/28 20:22ID:???
>>58
証拠写真はどうした？
0062nobodyさん02/07/29 09:39ID:???
>>61
は げ ど う
0063nobodyさん02/08/10 08:57ID:???
アイス3連食い。夏はこれだな。
0064nobodyさん02/09/04 13:07ID:???
それは聞き捨てならんな。
0065nobodyさん02/09/05 11:00ID:???
１さん、今日は何を教えてくれるのですか？
0066nobodyさん02/09/06 07:24ID:???
>>58
証拠写真キボンヌ。
■ このスレッドは過去ログ倉庫に格納されています