【待望】PerlユーザのためのPHP入門

俺様 · 03/02/27 15:17

見事Perl→PHPへの脱皮に成功した俺様が
両者の違いを中心に講義してやる。
今までPerlﾏﾝｾｰだったやつはこれを機にPHPに変更しよう也。
質問もガンガン書いてくれ。
このPerlの文はPHPだとどう書くの？とか。

**nobodyさん** · 03/02/27 15:19

このスレ結構ありがたいかも。
>>1
ありが㌧

俺様 · 03/02/27 15:19

まず、両者には似てる部分も非常に多いというのは特徴だ。
例えば変数の宣言、初期化をしてみよう。
$foo = 0;
頭に$をつけるところも、型を特に指定する必要がないことも、
文末は;になることもみんな一緒だ。

ほら、簡単に移行できそうに思えてきただろ？

俺様 · 03/02/27 15:31

とりあえずHello, world!を出力してみるぞ。

<?
print "Hello, world!\n";
?>

printの意味はperlと一緒だ。
まあ、printよりecho使う人が多いがそんなに違いはない。
perlユーザならわかりやすい方が（･∀･）ｲｲ!だろう。

プログラムの開始と終了は<?と?>で囲むんだ。
これはPHP特有だから早く覚えよう。
<?じゃなくて<?phpで囲んでもOK。将来XMLとの連携を考えるなら
後者で書く癖をつけたほうが良いとは言われている。

**nobodyさん** · 03/02/27 15:37

↓↓↓↓↓★ココだ★↓↓↓↓↓
http://www.pink-angel.jp/betu/index.html

**nobodyさん** · 03/02/27 15:39

PHPでrequireするファイルは必ず<?php ?>で囲まなきゃダメ？

俺様 · 03/02/27 15:50

とりあえずCGIじゃなくてmod_phpを使っていこう。
例えばCGI/Perlの場合、

#!/perl/bin/perl
print "Content-type: text/html\n\n";
print "Hello, world!\n";

簡単なテストスクリプトを書くときも2行目あたりのウザイのを
書く必要があったがmod_phpならそんな必要はない。
とにかく<?と?>で囲めばＯＫだ。

というわけで課題として、各自ローカルサーバにPHPをインストールしておこう。
PerlユーザならApacheはインストールしてあると思うのでそれを前提とすると、

http://www.php.net/downloads.php
上記サイトにある
Windows Binaries
PHP 4.3.1 zip package [5,853Kb]
を落とすのじゃ。下のPHP 4.3.1 installerの方が楽そうに見えるが
こっちはCGI/PHPとしてしか使えないから駄目。間違えるなよ。

俺様 · 03/02/27 15:55

>>6
どういう用途で用いるのか知らんが
PHPスクリプトをrequire()するなら当然
そっちも<? ?>は必要だぞ。

まあ、聞くより自分で確かめたほうが早いだろう。

俺様 · 03/02/27 15:59

PHPのインストールについては
詳しく解説しているところを見たほうが早いか。
始めたばかりの頃俺が参考にした所だ。

http://www.php-j.com/tutorial/install/win.php

では各自ローカルでPHPを動かせるようにしておきましょう。
その瞬間からPerlとはおさらばだ！

**nobodyさん** · 03/02/27 16:05

俺様、がんがれよ。

**nobodyさん** · 03/02/27 17:01

win用をインスコしたいのですが
ここ以外にバイナリって無いんですか？
http://www.php.net/downloads.php

俺様 · 03/02/27 17:15

>>11
そこのじゃ嫌なのか？
そこからで全然問題ないと思うが。

**nobodyさん** · 03/02/27 17:57

おお，このスレはありがたい．がんがってください．

**nobodyさん** · 03/02/27 18:00

期待age

俺様 · 03/02/27 20:27

CGI/Perlの場合は
能や予、表などの漢字を使うときに文字化けしないように
\能、\予、\表みたいな面倒な書き方をする必要があっただろう。

PHPでは大半の人がEUCの日本語コードで記述していて
そのような必要はない。

と、言うわけでEUCを読み書き・保存できるエディタを用意しておきましょう。
例えば、Windows標準のメモ帳では無理です。

まあ、ベクターとかでEUCって検索すればすぐに見つかる。
http://channel.goo.ne.jp/download/search/search.php3?MT=euc&CD=1&SW=1&OS=3&category=1&search_num=10

シェアウェアのものでよいならば秀丸やEmEditorがお奨め。

**nobodyさん** · 03/02/27 21:11

質問なんですけど、
関数の引数にハッシュを使う方法ってありますか？
function func($key,$value){
return "$key => $value";
}
$result = func("key"=>"value");
みたいにやりたいのですが
Parse error: parse error, unexpected T_DOUBLE_ARROW
というエラーがでました。

function func($key=>$value){
return "$key => $value";
}
でも無理でした。

俺様 · 03/02/27 21:36

>>16
PHP固有の質問はこっちへ書き込もうぜ。

【PHP】質問スレッド Part7
http://pc2.2ch.net/test/read.cgi/php/1044478561/l50

**nobodyさん** · 03/02/28 04:10

(PerlCode)
$name="john";
$say=sub{return "My name is $_[0].";};
print &{$say}($name);

はPHPで書くとどうなりますか？

**nobodyさん** · 03/02/28 06:25

>>18
俺のPerl自慢。

　　　　　　　　　　　　　　　　　　つづく

**nobodyさん** · 03/02/28 08:36

>>18
<?php
$name = "jhon";
function say($name) {return("My name is $name");}
echo say($name);
?>

**nobodyさん** · 03/02/28 09:16

そんなもんをXHTMLに埋め込んだら、見苦しくて死ぬぞ。
ブラウザでパースもできんようになるし。
MVCにしろや。

俺様 · 03/02/28 10:31

>>20
お答えサンクス。

と、いうわけでもうインストールはばっちしだと思うので
今日はユーザー定義関数についてから話そう。
超独自仕様のPerとの大きな違いの１つだ。
まあ、はっきり言っちゃえば
>>18みたいな書き方はPerlではごく普通だが
Perl知らない人から見れば何なのかさっぱりってほど特殊だ。
それに比べてPHPの>>20は他の言語
（例えばJavaとか）しか知らない人が見ても何となく理解できるだろう。

18 · 03/02/28 10:35

>>20
レスどうもです。

無名サブルーチンみたいなのが使いたいなと思っていたのですが、
create_function関数というのがあるみたいですね。
http://www.php.net/manual/ja/function.create-function.php

<?php
$name="john";
$say=create_function('$name','return "My name is $name.";');
print $say($name);
?>

俺様 · 03/02/28 10:51

Perlでは関数でなくサブルーチンと呼ばれていたな。

sub foo {
print "$_[0] ";
return $_[0]+100;
}
$b= &foo(100)
print $b;;
#100 200
-------------------
function foo($a) {
print "$a ";
return $a+100;
}
$b= foo(100);
print $b;
#100 200

PHPの場合は明示的に引数を記述しておく必要がある。
可変引数は配列を渡せば良いだろう。Perlも実際は@_という配列を渡しているわけだし。
まあ、こうやって見ると両方大した違いは無く見えるが
変数のスコープについて根本的な違いがあるので注意しよう。
それについては後述。

俺様 · 03/02/28 11:03

いちいち引数を書くとは面倒になったと言う人もいるだろうが、
おかげでデフォルト引数を簡単に実現できる。

<?php
function foo2($a ="俺様") {
print "$a は凄い<br>";
}
foo2("お前");
foo2();
?>

/*
お前は凄い
俺様は凄い
*/
引数を指定しなかったら勝手に俺様が凄くなってくれるのだ。

**nobodyさん** · 03/02/28 11:04

講座スレ作ろうとする奴って大体理論が崩壊してるよな・・・。

**nobodyさん** · 03/02/28 11:04

Perlでは関数でなくサブルーチンと呼ばれていたな。

sub foo {
print "$_[0] ";
return $_[0]+100;
}
$b= &foo(100)
print $b;;
#100 200
-------------------
function foo($a) {
print "$a ";
return $a+100;
}
$b= foo(100);
print $b;
#100 200

PHPの場合は明示的に引数を記述しておく必要がある。
可変引数は配列を渡せば良いだろう。Perlも実際は@_という配列を渡しているわけだし。
まあ、こうやって見ると両方大した違いは無く見えるが
変数のスコープについて根本的な違いがあるので注意しよう。
それについては後述。

俺様 · 03/02/28 11:08

これかいてる間に重要なこと思い出した。

#Perl code
$a=26;
print "$aゲット";

#26ゲット
-------------
#PHP code
$a=26;
print "$aゲット";

#（何も表示されない）
----------------------

両者にはこのような違いが起きてしまう。
下はどうすればよいのか各自考えてみましょう。

出かけるので解答は夜で。

俺様 · 03/02/28 11:09

26ゲットできなかったヽ(`Д´)ﾉ

俺様 · 03/02/28 11:10

>>26
俺様はPHP歴浅いので
崩壊どころか理論自体形成されていない。
だからこのスレタイは入門だ。
間違いはがんがん指摘してクレイ！

**nobodyさん** · 03/02/28 11:13

>>30
俺はPHPすら分からない。
だから、がんがん解説してクレイ!

**nobodyさん** · 03/02/28 11:19

結構見やすいPerl/PHPの構文比較のページ見つけました。

Perl/Php Translation
http://www.cs.wcupa.edu/~rkline/perl2php/

既出だったらゴメン。

俺様 · 03/02/28 11:21

>>32
それは便利だな。
では今後はそこに載ってないやつを指摘していくことにしよう。

**nobodyさん** · 03/02/28 11:25

>>18
<?php
$name = "jhon";
function say($name) {return("My name is $name");}
echo say($name);
?>

**nobodyさん** · 03/02/28 11:26

Perlでは関数でなくサブルーチンと呼ばれていたな。

sub foo {
print "$_[0] ";
return $_[0]+100;
}
$b= &foo(100)
print $b;;
#100 200
-------------------
function foo($a) {
print "$a ";
return $a+100;
}
$b= foo(100);
print $b;
#100 200

PHPの場合は明示的に引数を記述しておく必要がある。
可変引数は配列を渡せば良いだろう。Perlも実際は@_という配列を渡しているわけだし。
まあ、こうやって見ると両方大した違いは無く見えるが
変数のスコープについて根本的な違いがあるので注意しよう。
それについては後述。
Perlでは関数でなくサブルーチンと呼ばれていたな。

sub foo {
print "$_[0] ";

**nobodyさん** · 03/02/28 11:32

>>28
変数名の後ろは全角文字でもダメみたいですね。
（半角の「.」はOKだった）

#PHP code
$a=26;
print $a."ゲット";

#26ゲット

#PHP code
$a=26;
print "$a.ゲット";

#26.ゲット

**nobodyさん** · 03/02/28 11:33

>>28
print "${a}ゲット";
print $a."ゲット";
echo $a,"ゲット";

**nobodyさん** · 03/02/28 12:12

Perlでは関数でなくサブルーチンと呼ばれていたな。

sub foo {
print "$_[0] ";
return $_[0]+100;
}
$b= &foo(100)
print $b;;
#100 200
-------------------
function foo($a) {
print "$a ";
return $a+100;
}
$b= foo(100);
print $b;
#100 200

PHPの場合は明示的に引数を記述しておく必要がある。
可変引数は配列を渡せば良いだろう。Perlも実際は@_という配列を渡しているわけだし。
まあ、こうやって見ると両方大した違いは無く見えるが
変数のスコープについて根本的な違いがあるので注意しよう。
それについては後述。
Perlでは関数でなくサブルーチンと呼ばれていたな。

sub foo {
print "$_[0] ";
　

**nobodyさん** · 03/02/28 12:41

シフトJISでがんがん書いてます。

俺様 · 03/02/28 20:06

>>36
　　_n
　（　l　　　　_、_
　＼＼　（ <_,`　）
　　　ヽ___￣￣　）　　ｸﾞｯｼﾞｮﾌﾞ!!　
　　　　　/ 　　/

>>37
　　　_、_
　（　,_ﾉ` ）　　　　n
￣　　　＼　　（ E）　ｸﾞｯｼﾞｮﾌﾞ!!
ﾌ　　　 /ヽヽ_／／

俺様 · 03/02/28 20:12

些細なことに見えるが、
自分はこのせいで某スクリプトを
PerlからPHPに移植する際に、
３０分ぐらい睨めっこした記憶があるので。
頭の中に入れて起きましょう。

$a=26;
print "{$a}ゲット";
print $a."ゲット";

**nobodyさん** · 03/03/01 11:16

先生質問です。
>>9の通りしましたがapacheが起動できません。
どうやらhttpd.confのLoadModule php4_module C:/php/sapi/php4apache.dllが原因のようです
php4apache.dllをphp4apache2.dllとしても同じでした。

WinME Apache2.0.39です

**nobodyさん** · 03/03/01 11:44

>>42
OS側類。

俺様 · 03/03/01 12:12

>>42
Apacheは２よりも1.3.27の方がいいと思う。
後はなんだろな～
Meなんて怪しいＯＳ使ったことないからな。
とりあえずApacheのバージョンを変えて試してみてクレイ。

**nobodyさん** · 03/03/01 12:41

>>44
ありがとうございます。1.3.27を使ったら起動できました。

**nobodyさん** · 03/03/01 16:35

　|　 | ∧
　|＿|Д｀) < それだー！！
　|文|⊂）
　|￣|∧|
￣￣￣￣￣
　|　 | ∧
　|＿|Д｀) < それだー！！
　|文|⊂）
　|￣|∧|
￣￣￣￣￣
　|　 | ∧
　|＿|Д｀) < それだー！！
　|文|⊂）
　|￣|∧|
￣￣￣￣￣
　|　 | ∧
　|＿|Д｀) < それだー！！
　|文|⊂）
　|￣|∧|
￣￣￣￣￣
　|　 | ∧
　|＿|Д｀) < それだー！！
　|文|⊂）
　|￣|∧|
￣￣￣￣￣

**nobodyさん** · 03/03/01 16:36

>>44
OS = Windowsとか思っている痛い講師がいるクソスレはココですか。

俺様 · 03/03/01 17:05

>>47
世の中は理詰めだけでは解決しない。
理論ヲタになるより、わかりやすさを求める方が現実的だ。
わかるかい？
しかも、PHPと直接は関係ない。
君は文学者がテイラー展開を出来なかったら馬鹿にするだろうか？

では、今日はいよいよ変数のスコープについての説明だ。
あくまでも対象者は基本的に『Perlしか』やったことがない人のみ。
C言語など他の言語をやっている人には馬鹿見たく思われる説明になるからだ。

**nobodyさん** · 03/03/01 17:07

>>48
＞君は文学者がテイラー展開を出来なかったら馬鹿にするだろうか？

少なくとも数学者を目指す文学者がマクローリン展開を知らなければバカにするが。

俺様 · 03/03/01 17:30

>>49
俺様はべつにオペレーティングシステムのエキスパートを目指してはいないッポ。

#Perlscript

sub foo{
$a = 100;
print "$a,";
$a++;
}

&foo();
print $a;

#100,101

まあ、当たり前の結果が表示されます。
これをPHPに書き換えてみましょう。

俺様 · 03/03/01 17:34

#PHPscript

<?php
function foo(){
$a = 100;
print "$a,";
$a++;
}

foo();
print $a;

?>
# 100,

何故か100しか表示されません！？(￣□￣;)ﾅﾝﾄ!!
どうして後ろの$aは表示されなかったのでしょうかという問題です。

俺様 · 03/03/01 17:41

同様の例です。

#Perl

sub hoge{
print $a;
}
$a="俺様";
&hoge;
----------
#PHP

function hoge(){
print $a;
}
$a="俺様";
hoge();

Perlの方だと見事、俺様と表示されるのですが、
後者の方は何も表示されないので吃驚仰天です。

**nobodyさん** · 03/03/01 17:47

>>50
＞俺様はべつにオペレーティングシステムのエキスパートを目指してはいないッポ。

いや、エンジニアでなくても車=ベンツとか思ってる奴はアホなわけで。

教養ではなく常識なのよ。常識。

**nobodyさん** · 03/03/01 18:26

>>53
邪魔。ｷｴﾛ

**nobodyさん** · 03/03/01 18:33

>>54
どうしていつものコテハンを使わないんですか？

**nobodyさん** · 03/03/01 18:58

>>55
ごめんごめん。かんじよめないんだ？
ｼﾞｬﾏ。ｷｴﾛ

俺様 · 03/03/01 19:04

>>54,>>56
（・∀・）ｶｴﾚ!!
せっかくこのスレを良い感じにしたいのだから
煽りはよそでやってクレイ。

俺様 · 03/03/01 19:06

>>53
まあ、教養が無かった俺様が厨ってことで
その話題は終わりにしよう。スレ違いだし。

**nobodyさん** · 03/03/01 19:09

↓↓↓↓↓★ココだ★↓↓↓↓↓
http://www.pink-angel.jp/betu/linkvp/linkvp.html

**nobodyさん** · 03/03/01 19:29

>>50-51
Perlがデフォルトでグローバル変数なのに対して、
PHPでは、デフォルトでローカル変数だから。

#PHPscript
<?php
function foo(){
$a = 100;
print "$a,";
$a++;
}
foo();
print $a;
?>
は

#Perlscript
sub foo{
my $a = 100;
print "$a,";
$a++;
}
&foo;
print $a;

と同じ
#始めたばかりなので全く同じかどうかとか用語の使い方は正しくないかもしれません

**nobodyさん** · 03/03/01 19:56

#PHPscript
<?php
$a = 999;
function foo(){
$a = 100;
print "$a,";
$a++;
}
foo();
print $a;
?>
#100,999

なーる。

俺様 · 03/03/01 19:58

>>60
(*ﾟ▽ﾟﾉﾉﾞ☆ﾊﾟﾁﾊﾟﾁ

Perlにおいていわゆるmyを付けた場合が
PHPでは標準になっています。
C言語などの場合はコンパイル時に
未定義（未宣言）の変数だ！ってエラーを出してくれるのですが、
PHPではそのまま初期値（文字なら空白、数字なら0）として
認識してしまうので注意しましょう。

結構すんなり受け入れられるのかなー？
普段からmyを使ったりしている人なら問題ないだろうけど
プログラミング言語をPerlしかやってないでグローバルなのが当たり前だって
思ってた人には受け入れるのに時間が掛かるかもしれない。

そんなことないか？どうだろう。

**nobodyさん** · 03/03/01 20:01

Perlってなんて読むの？

俺様 · 03/03/01 20:08

逆にPerlの標準のようにグローバル（大域）変数として
扱いたい場合も書いておきましょう。
これはCやJavaとも違う仕様ですね。
関数内の最初でglobalと宣言します。
なお、PHPの設定でregister_globalsをonにすると
また違うようなのですが、デフォルトはoffで推奨となっているのでそれに従います。

<?php
$a = 999;
function foo(){
global $a; //これでグローバルスコープの$aを参照しますよと宣言している。
print "$a,";
$a++;
}
foo();
print $a;
?>
#999,1000

因みに、function foo()はどこに書いてもOKです。
（PHP3だったころは駄目だったとか・・・）

>>63
[p:(r)l]

俺様 · 03/03/01 20:25

Perlには静的（スタティック）変数が無かったと思うので
それについても書いておきましょう。

function foo(){
static $a=0;
print $a;
$a++;
}

for($i=0;$i<5;$i++){
foo();
}

#01234

このようにすると
最初にfoo()が呼ばれたときのみstatic $a=0が呼ばれてくれるのです。
以降、foo()が呼ばれるたびに$aは１ずつ増加してくれます。
staticをつけないと毎回0が出力されてしまいますね。
変数のスコープは関数内のみなのに値を保持していてくれるわけです。
globalでは無いので関数外部から直接$aの値をいじることは出来ません。

**生徒Ｂ** · 03/03/01 20:39

perlの use strict; のような未定義変数をチェックする方法はPHPに無いのでしょうか。

**nobodyさん** · 03/03/01 20:50

{
my $static = 0;
sub foo () {
return ++$static;
}
}

**nobodyさん** · 03/03/01 21:03

だめだ・・・functionの時点でわからそ。

俺様 · 03/03/01 21:27

>>66
すまんが俺様は知らんな。
全ての定義済の変数を配列で返すような
関数ならあるが。

<?php
$def_arr= get_defined_vars();
//初期設定（_SERVER["SERVER_ADDR"]のようなもの）
//を含む全ての定義済みの変数の配列を得る）

$a=3;
$abc=10;

$arr = get_defined_vars();
//初期設定のものに上の２つが追加された。

$new_arr = array_diff($arr,$def_arr);
//２つの配列の差を得る。

print_r($new_arr);//配列の内容を出力
?>

#Array ( [a] => 3 [abc] => 10 )

**nobodyさん** · 03/03/01 21:29

俺様 · 03/03/01 21:32

>>67
なるほど。Perlでstaticを実現した例ですね。
まあ、PHPの場合はわざわざ自前で作らなくても
最初からstaticという命令が用意されているということです。

俺様 · 03/03/01 21:35

>>68
Perlをある程度理解していれば
わかるようにしたいのだが、
（Perlも未経験という場合はちょっと厳しいです。）
どこら辺がわからんだろうか？
とりあえずPerlのsubをfunctionに置き換えちゃえばＯＫだ。

**nobodyさん** · 03/03/01 21:35

**生徒Ｂ** · 03/03/01 21:56

>>69
どもども。
ちょっと面倒ですね。

**nobodyさん** · 03/03/01 22:00

**nobodyさん** · 03/03/01 22:12

>>66
error_reporting(E_ALL);
でどうかな。

**nobodyさん** · 03/03/01 22:16

**生徒Ｂ** · 03/03/01 22:22

<?php
error_reporting(E_ALL);
print $a;
?>
#<b>Notice</b>: Undefined variable: a in <b> (filename)
# </b> on line <b>3</b><br />

>>76
ありがとう。うまくいきました。

**nobodyさん** · 03/03/01 22:23

俺様 · 03/03/01 22:30

>>76
（･∀･）ｲｲ!

φ(.. )ﾒﾓｼﾃｵｺｳ
error_reporting(E_ALL);

**nobodyさん** · 03/03/01 22:35

あいだに空を入れる人生。色即是空(w

**nobodyさん** · 03/03/02 00:05

俺様 · 03/03/02 19:03

よっしゃ！早くも寂れてきたぞ。今日は配列について書いておこう。

まず、Perlの場合配列値を表す変数は先頭が$でなく@になっていた。
しかしPHPではそんな面倒なことはない。どんな場合でも先頭は$でＯＫだ！
凄い楽そうだろ？（祝

初期化の差はこんな感じだ。

#Perl
@a = (20,10,30,3);

#PHP
$a = array(20,10,30,3);

arrayって余計な文字が付いたが細かいことは気にするな。

俺様 · 03/03/02 19:10

驚くことにPHPでは

$a[] = "a";
$a[] = "b";
$a[] = "c";

$a[0] = "a";
$a[1] = "b";
$a[2] = "c";

この２つが同じ意味となるのだ。
角括弧内の数字を省略した場合、
値は配列に最後の要素として勝手に追加してくれる。
まあ、こういう独自仕様は混乱の元だから俺は上の形式で書いたことは無いがな。
わかった上で使うなら利用場面は結構多いかもしれない。

**nobodyさん** · 03/03/02 19:12

↓↓↓↓↓★ピンクエンジェル★↓↓↓↓↓
http://www.pink-angel.jp/betu/linkvp/linkvp.html

俺様 · 03/03/02 19:19

配列の関数一つ一つ説明するのは面倒だから
あとは>>32のサイトや公式のマニュアルでも読んでくれ。
Perlで実現できてたことの代替手段は大体存在してる。

俺様 · 03/03/02 19:26

多次元配列は一つ注意を。
これは前も似たようなこと言ったが

$a[0][1] = 41;
print "$a[0][1]";

Perlだと期待する結果41が出力されるが、
PHPだとArray[1]という怪しげな結果が出力されてしまう。
後ろの[1]はただの文字列として認識されてしまっているようなのだ。
以下のどちらかにしないといけない。

$a[0][1] = 41;
print "{$a[0][1]}";
print "".$a[0][1];

俺様 · 03/03/02 19:28

まあ、おかしくなったらまずは変数を{}で括ってみろってことだ。

**nobodyさん** · 03/03/02 19:51

@a{qw(a b c)} = @b[1..3];
こういうのはどう書く?

**nobodyさん** · 03/03/02 20:32

俺様 · 03/03/02 21:07

>>89
うーん、よくわからんな（汗
誰かわかる人募集中だ！

まあ、とりあえず根性で全部書いておけ。
$a = array(
"a" => $b[1],
"b" => $b[2],
"c" => $b[3],
)

**nobodyさん** · 03/03/02 23:06

なんで、空投稿するんだよ。見ずらいんだよ。

**nobodyさん** · 03/03/02 23:16

日本語すら満足に書けない俺様が講師のクソスレはここですか？

見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。

**nobodyさん** · 03/03/02 23:20

ねちっこいね。うざいというかきもい。

**nobodyさん** · 03/03/02 23:27

　 ∧＿∧
　（　´∀｀）＜きもい。きもい。
　（　　　つ
　（_○_＿_)

**nobodyさん** · 03/03/02 23:31

見づらいんだよ。でした。すまん。
俺は「俺様」じゃないです。

**nobodyさん** · 03/03/03 04:20

普通に見てる人もいるんで、煽ってるやつらマジでどっかいって。

**nobodyさん** · 03/03/03 08:39

>>97
普通にウザがってる人もいるんで自分のサイトでやるように説得してください。

俺様 · 03/03/03 10:08

煽りでもレスが付かないよりは大歓迎だ！
>>98
需要も少しはあるようだからまあ、多めに見てもいいじゃないか。
WebProg板ってスレ保持数に比べて活性化しているスレ数が非常に少ないから
他のスレがdat落ちして困るとかも無いしな。ウザかったら見なければ（･∀･）ｲｲ!
２ｃｈブラウザ使ってこのスレごとあぼーんだ。

俺様 · 03/03/03 10:33

今日はオブジェクト指向について書いておこう。
PHPもPerlもJavaやC++に代表されるオブジェクト指向言語である。

Perlのオブジェクト指向についてあまり知らないんですが、
Javaに比べるとPHPのオブジェクト指向に関する仕様は
　　　　　　　　　　　　　ショボイ！！！！
今年中に出る予定のPHP5で大幅に機能がアップするらしいので
それに期待しましょう。

俺様 · 03/03/03 10:48

まず、誰でも最初に疑問に思うのが
オブジェクト指向を用いるメリットは何か？
ということだ。

再利用ができる？
そんなのオブジェクト指向じゃなくてもしてるじゃないか。
我々はprintという出力命令を何度も利用している。
printの命令が内部でどういう仕組みになっているか調べたことのある人は極少数だろう。

俺様 · 03/03/03 11:12

まあ、オブジェクト指向をうまく使えば
再利用『しやすく』はなるだろう。

まず、カプセル化（データ隠蔽）というものがある。
人間というオブジェクトの例で考えてみよう。
人間は体重というデータを持っているが
我々は外見から見ただけでは体重を正確には知れない。
例えば、彼に『体重計に乗れ』ってメッセージを送れば
正確な体重を得ることが出来る。
同様に体重に『直接』アクセスして値を変えることは出来ない。
彼に『～を食べろ』ってメッセージを送れば
その食べた分だけ体重が増加してくれるのである。

つまり、内部で保持しているデータを隠蔽できて、
見たり変えたりするには間接的にアクセスする必要があるということなのだが、

PHPではアクセサ（アクセス制限）の概念が存在しないため
このカプセル化があっさり崩壊してしまう。

俺様 · 03/03/03 11:35

再利用のためのもう一つの便利な機能は『継承』だろう。
既存のクラスのフィールド（データ）やメソッド（機能）を引き継いで、
その上で既存の機能を修正したり新たに追加したりできるようになる。
まあ、言い方を変えれば『継ぎはぎ』みたいなものだ。

PHPでは多重継承が存在しない。
つまり、あるクラスに対して１つの親クラスからしか
フィールドやメソッドを引き継げないということだ。
同じく多重継承が禁じられているJavaではこのようなことがしたければ
interfaceで代替が可能だが、
PHPではその代替案すら用意されていない。

多重継承なんかしなくてもプログラムは作れるという主張も根強いが、
まあ、それを言ったら継承なんかしなくてもプログラムを作れる
と言っても同じようなことである。

俺様 · 03/03/03 12:07

１つぐらいサンプルを書いてみよう。
因みに、このように変数に日本語使っても大丈夫だ。
（普段はお奨めしない。）

<?php
class 人{ //クラス名
var $体重; //フィールド
function 人($値){ //コンストラクタ（初期化）
$this->体重=$値; //値をフィールドへ代入
}
function 体重計に乗る(){ return $this->体重;} //体重を出力するメソッド
function 食べる($量){ $this->体重+=$量;} //体重を量だけ加える
}

$俺様=new 人(60);
print $俺様->体重計に乗る();
print ",";
$俺様->食べる(0.5);
print $俺様->体重計に乗る();
#60,60.5
?>

俺様 · 03/03/03 12:10

クラス内で自分自身のフィールドにアクセスするのにも
$this->体重
このように$thisとかいうものが必要なのだ。
（Javaの場合は省略可能）
これは長いコードを書こうとするとわかるが面倒すぎ。

俺様 · 03/03/03 12:16

ここで>>102で指摘した問題が起きる。
<?php
class 人{
var $体重;
function 人($値){
$this->体重=$値;
}
function 体重計に乗る(){ return $this->体重;}
function 食べる($量){ $this->体重+=$量;}
}

$俺様=new 人(60);
$俺様->体重 = 200; //おいおい、勝手に体重変えられたYO!
print $俺様->体重; //体重計使わなくても調べられるのかYO!
#200 俺は相撲取りじゃねえYO!
?>

てなわけで体重計とかのメソッドを作る意味がなくなってしまうのだ。
（Javaの場合はフィールドの前にprivateを付けるなどすれば
このような直接アクセスを防ぐことが出来る。）

俺様 · 03/03/03 12:26

コンストラクタと言うのは結構便利なんだがな。
<?php
class 人
{
var $体重;
function 人($値){
if($値<0) print "(　´,_ゝ`）ﾌﾟ";
else $this->体重=$値;
}
}

$俺様=new 人(-20);
#(　´,_ゝ`）ﾌﾟ
?>

このように体重に負の値が入れられるのを
防ぐことが出来る。
まあ、>>106のようにされたら結局は意味が無いのだが・・・

俺様 · 03/03/03 12:30

というわけで長くなったが
PHPのオブジェクト指向は
現在の仕様では大したことがないということで
積極的に使う必要は無いだろう。
機能をグループ化したい人とか、
『何となくかっこいいことしたい人とか』
（ただし、使い方を誤ると逆にかっこ悪くなる）
にはしても損は無い程度だろうか。

いずれにしてもPHP5に期待。

俺様 · 03/03/03 12:33

否定的なことばかり書いてたが
最近の本とか見るとメリットしか書いてなくて
オブジェクト指向ﾏﾝｾｰになる奴が多すぎる気がするから
敢えて逆行して書いただけで、
メリットをもっと強調するのなら実際は
そこまでひどいわけでもないがな。

**nobodyさん** · 03/03/03 23:34

98 名前：nobodyさん投稿日：2003/03/03(月) 08:39 ID:???
>>97
普通にウザがってる人もいるんで自分のサイトでやるように説得してください。

99 名前：俺様投稿日：2003/03/03(月) 10:08 ID:gt/b6+qo
煽りでもレスが付かないよりは大歓迎だ！
>>98
需要も少しはあるようだからまあ、多めに見てもいいじゃないか。
WebProg板ってスレ保持数に比べて活性化しているスレ数が非常に少ないから
他のスレがdat落ちして困るとかも無いしな。ウザかったら見なければ（･∀･）ｲｲ!
２ｃｈブラウザ使ってこのスレごとあぼーんだ。

98 名前：nobodyさん投稿日：2003/03/03(月) 08:39 ID:???
>>97
普通にウザがってる人もいるんで自分のサイトでやるように説得してください。

99 名前：俺様投稿日：2003/03/03(月) 10:08 ID:gt/b6+qo
煽りでもレスが付かないよりは大歓迎だ！
>>98
需要も少しはあるようだからまあ、多めに見てもいいじゃないか。
WebProg板ってスレ保持数に比べて活性化しているスレ数が非常に少ないから
他のスレがdat落ちして困るとかも無いしな。ウザかったら見なければ（･∀･）ｲｲ!
２ｃｈブラウザ使ってこのスレごとあぼーんだ。

**nobodyさん** · 03/03/03 23:34

98 名前：nobodyさん投稿日：2003/03/03(月) 08:39 ID:???
>>97
普通にウザがってる人もいるんで自分のサイトでやるように説得してください。

99 名前：俺様投稿日：2003/03/03(月) 10:08 ID:gt/b6+qo
煽りでもレスが付かないよりは大歓迎だ！
>>98
需要も少しはあるようだからまあ、多めに見てもいいじゃないか。
WebProg板ってスレ保持数に比べて活性化しているスレ数が非常に少ないから
他のスレがdat落ちして困るとかも無いしな。ウザかったら見なければ（･∀･）ｲｲ!
２ｃｈブラウザ使ってこのスレごとあぼーんだ。

98 名前：nobodyさん投稿日：2003/03/03(月) 08:39 ID:???
>>97
普通にウザがってる人もいるんで自分のサイトでやるように説得してください。

99 名前：俺様投稿日：2003/03/03(月) 10:08 ID:gt/b6+qo
煽りでもレスが付かないよりは大歓迎だ！
>>98
需要も少しはあるようだからまあ、多めに見てもいいじゃないか。
WebProg板ってスレ保持数に比べて活性化しているスレ数が非常に少ないから
他のスレがdat落ちして困るとかも無いしな。ウザかったら見なければ（･∀･）ｲｲ!
２ｃｈブラウザ使ってこのスレごとあぼーんだ。
　　　　　　　　　　　　　　　　　　　　　　　　　　　

**nobodyさん** · 03/03/03 23:34

98 名前：nobodyさん投稿日：2003/03/03(月) 08:39 ID:???
>>97
普通にウザがってる人もいるんで自分のサイトでやるように説得してください。

99 名前：俺様投稿日：2003/03/03(月) 10:08 ID:gt/b6+qo
煽りでもレスが付かないよりは大歓迎だ！
>>98
需要も少しはあるようだからまあ、多めに見てもいいじゃないか。
WebProg板ってスレ保持数に比べて活性化しているスレ数が非常に少ないから
他のスレがdat落ちして困るとかも無いしな。ウザかったら見なければ（･∀･）ｲｲ!
２ｃｈブラウザ使ってこのスレごとあぼーんだ。

98 名前：nobodyさん投稿日：2003/03/03(月) 08:39 ID:???
>>97
普通にウザがってる人もいるんで自分のサイトでやるように説得してください。

99 名前：俺様投稿日：2003/03/03(月) 10:08 ID:gt/b6+qo
煽りでもレスが付かないよりは大歓迎だ！
>>98
需要も少しはあるようだからまあ、多めに見てもいいじゃないか。
WebProg板ってスレ保持数に比べて活性化しているスレ数が非常に少ないから
他のスレがdat落ちして困るとかも無いしな。ウザかったら見なければ（･∀･）ｲｲ!
２ｃｈブラウザ使ってこのスレごとあぼーんだ。
　

**nobodyさん** · 03/03/04 02:34

あんまり資源無駄に使ってるとアク禁食らっちゃうよー

**nobodyさん** · 03/03/04 05:05

このスレすごく良いです。頑張ってください。

**nobodyさん** · 03/03/04 07:56

>>113
同意。>>1は反省しる。

>>114
自作自演晒しage

俺様 · 03/03/04 10:17

オブジェクト指向に関するレスは０か。
まあ、使わなければならない機能でもないから放って置いてくれ。
今日はそろそろ具体的なHTMLドキュメントの作成方法に入っていこう。

>>113
気をつけます。
>>114
(TдT) ｱﾘｶﾞﾄｳ
>>115
俺様は朝５時になんか起きれん。

俺様 · 03/03/04 10:29

出力方法は何通りかあるので示しておきます。
自分が使いやすい方法を用いればよいだろう。

<?php
$title = "タイトル";
print "<html>";
print "<head>";
print "<title>$title</title>";
print "</head>";
print "<body>";
print "俺様のHTMLドキュメント";
print "</body>";
print "</html>";
?>

前も言ったように、CGI/Perlの場合は
print "Content-type: text/html\n\n";
こんなのが必要だったがmod_phpの場合は要らない。
上のスクリプトを書いてブラウザで開いてみれば
見事、俺様のHTMLドキュメントと出力される。

俺様 · 03/03/04 10:50

資源無駄使いって言われたので
混合させてまとめて記述しちゃうか。
<?php
$title = "タイトル";
echo "<html>"; //echoも出力命令の１つ。printと同じようなものと思って良い。
echo("<head>"); //今まで省略してたけど()を付けても構わない。printも同様。

//C言語にあったprintfも使える。%3dなど書式をいろいろ設定できる。
//printやechoと違い、()が必須なので注意。
printf("<title>%s</title>",$title);
printf("</head>");

print <<<EOD //ヒアドキュメント。HTML部分が長くてprintとか書くのが面倒なとき便利
<body>
俺様のHTMLドキュメント
</body>
EOD; //ヒアドキュメント終了
print "</html>";
?>

ヒアドキュメントはPerlでも使っていた人は多いでしょう・
Perlでは↓のように書くが、PHPではセミコロンの位置が変わっているので
間違えないように注意しよう（重要）。
print <<EOD;
...
EOD

俺様 · 03/03/04 11:00

因みに、PHPはHTML内に埋め込むことができると言うのを
利点として主張されることも多い。これは以下のように書けるからである。
<?php $title = "タイトル"; ?>
<html>
<head>
<title><?php $title ?></title>
</head>
<body>
俺様のHTMLドキュメント
</body>
</html>
このように必要な部分だけをPHPスクリプトとして認識させることが出来る。

コメントについても書いちゃおう。
Perlでは#のみだったがPHPではJavaなどで使われている以下の形式も可能である。
// コメント。#と意味は同じ。
/* これもコメント。複数行をコメントか出来るのが特徴。
つまりここもコメントになる。　　　*/

俺様 · 03/03/04 11:11

この利点を利用すれば
簡単なカウンタなら
カウント保存用の空ファイルさえアップしておけば
ほんの数行であっという間に出来てしまうのだ。

明日はファイル入出力をやろう。

**nobodyさん** · 03/03/04 12:54

>>116
オブジェクト指向、興味あるよ？

**nobodyさん** · 03/03/04 18:41

手っ取りばやくお金もうけしましょう
http://www.h4.dion.ne.jp/~sohotop/
日給２万円も無理じゃない！！！

**nobodyさん** · 03/03/04 18:50

>122
ねずみ講じゃないの？

**nobodyさん** · 03/03/04 18:55

http://www.agemasukudasai.com/bloom/

**nobodyさん** · 03/03/04 19:35

香ばしいです、はい。

**nobodyさん** · 03/03/04 21:46

OOの無いPHPを使う位なら俺はPerlを使う。

**生徒Ｂ** · 03/03/05 01:20

>>126
入門なんだから、大目に見てくださいな。

俺様 · 03/03/05 10:25

>>126
まあ、まずはOOを使うメリットをよく考えないと。
モジュールでも作るのか？

>>127
OOの入門レベルなら
プログラミング全体で見てもやはり入門であることには違いない。

**nobodyさん** · 03/03/05 10:41

俺様 · 03/03/05 10:50

では、ファイル操作について簡単な説明をしておこう。
ファイルの開き方は、PerlではopenだったがPHPではfopenになる。
読み取りや書き込みなどのモードもPerlとは仕様が変わり
C,Java寄りになっているので注意しよう。
PHP:
$fp = fopen(filename, mode); //ファイルポインタの位置が返る
Perl：
open(FILE, filename); //返り値は正常時が1、失敗だと０

オープンモードの選択方法がPerlだと+>みたいのをファイル名に直接つけていたのが
PHPだと２つ目の引数として別に記述するようになった。
ファイルハンドラは引数に記述するのではなく、
返り値になったのでそこも注意しよう。

具体的な仕様はマニュアルを参照。
http://www.php.net/manual/ja/function.fopen.php

**nobodyさん** · 03/03/05 10:52

>>130
なぁ、お前学校行ってないの？

俺様 · 03/03/05 11:07

では超簡易カウンタを作ってみよう。
仕様としてはファイルcount.txtの１行目にカウンタ数値を書くだけのものだ。
まず予めcount.txtを作成して0を記述しておくこと。

<?php
$fp = fopen("count.txt","r");
//count.txtを読み出しモードで開く。
//$fpはファイルポインタであり、rの場合ファイルの先頭の位置が返される。
$count = fgets($fp); //改行かファイルの終端まで読みこんで$countへ代入。
fclose($fp); //いったん閉じる
$count++;
$fp = fopen("count.txt","w"); //書き込みモード
fwrite($fp,$count); //書き込み。
fclose($fp);
?>
<html>
<body>
貴方は<?php print $count; ?>人目の俺様の弟子じゃ。
</body>
</html>

俺様 · 03/03/05 11:16

>>131
ｵﾏｴﾓﾅｰ

俺様 · 03/03/05 11:25

では明日はいよいよフォームの処理を行おう。

俺様 · 03/03/05 11:27

ちなみにレッツPHPにファイルを１回しか開かなくていいバージョンが書かれているな。
http://php.s3.to/counter/
同時アクセスの際の弊害が置きにくくなるからそっちの方がいいだろう。
flockもしておくこと。

俺様 · 03/03/05 11:56

因みに、PHPはHTML内に埋め込むことができると言うのを
利点として主張されることも多い。これは以下のように書けるからである。
<?php $title = "タイトル"; ?>
<html>
<head>
<title><?php $title ?></title>
</head>
<body>
俺様のHTMLドキュメント
</body>
</html>
このように必要な部分だけをPHPスクリプトとして認識させることが出来る。

コメントについても書いちゃおう。
Perlでは#のみだったがPHPではJavaなどで使われている以下の形式も可能である。
// コメント。#と意味は同じ。
/* これもコメント。複数行をコメントか出来るのが特徴。
つまりここもコメントになる。　　　*/

**nobodyさん** · 03/03/05 13:34

PHPには「～?～:～」に該当する関数等はありまつか？
下のようなのが沢山あるのでなるべくif文は使いたくないんです。

例1：（Perl）
printf "<a href=\"%s\" target=\"%s\">%s</a>\n",&link($a?$b:$c),$d?"_blank":"_top",$d?"新しいウィンドウで開く":($e?"次のページ":"更新");

**nobodyさん** · 03/03/05 13:39

条件演算子としては、他に "?:" (または trinary) 演算子があります。この演算子の動作は、Cまたは他の多く言語と同じです。

(式1) ? (式2) : (式3);

この式は、式1 がTRUEの場合に式2 を、式1 がFALSEの場合に式3 を値とします。

と、PHPマニュアルからまんま転載してみる。

**137** · 03/03/05 13:44

>>139
ありがとう。
PHPに乗り換えようかと思います。

俺様 · 03/03/05 14:02

PHPによるHTTP認証のフックは、Apacheモジュールとして実行した時のみ有効で、
CGI版では利用できません。Apache モジュールPHPスクリプトにおいて、header()
関数を使用して "Authentication Required" メッセージをクライアントブラウザに送る
ことが可能です。これにより、クライアントブラウザにユーザー名とパスワードを入力するウイ

ンドウがポップアップ表示されます。一度、ユーザーがユーザー名とパスワードを
入力すると、PHP スクリプトを含むその URL は、次回以降、定義済みの変数 PHP_AUTH_USER, PHP_AUTH_PW, and PHP_AUTH_TYPEにそれぞれユーザー名
、パスワード、認証型を入力してコールされます。定義済みの変数は、配列 $_SE
RVER および $HTTP_SERVER_VARS　でアクセス可能です。 "Basic" 認証のみ
がサポートさ
れています。詳細は、 header()を参照下さい。

俺様 · 03/03/05 19:13

>>140
俺様の騙りがついに
ｷﾀ━(ﾟ∀ﾟ)━( ﾟ∀)━( ﾟ)━( )━(ﾟ )━(∀ﾟ )━(ﾟ∀ﾟ)━!!!!

**nobodyさん** · 03/03/05 19:16

http://www.agemasukudasai.com/bloom/

**nobodyさん** · 03/03/05 21:23

つづきまだー？

**nobodyさん** · 03/03/05 22:26

>>132
ファイルロックとかしなくても大丈夫？

**nobodyさん** · 03/03/05 22:51

$a : $b ? $c = 1;

PHPはこれ書ける?

俺様 · 03/03/05 23:06

>>143
まあ、１日にいくつも書くの疲れるから。
あせらず明日まで待ってクレイ。

>>144
実際に使うなら、ファイルロックしないと( ﾟдﾟ;)ﾏｽﾞｰだろうな。
シンプルカウンタは>>135のを使ったほうが良い。

>>145
?と:が逆じゃん？
>>138

**nobodyさん** · 03/03/05 23:17

>>145
三項演算子まともに使えない自作自演俺様晒しage

俺様 · 03/03/05 23:47

>>147
ん？>>146で言った逆っての間違ってたか？
そんなことはないと思うが・・・

**nobodyさん** · 03/03/06 00:26

>>145-148
てか>>137-138で既出だし。

**nobodyさん** · 03/03/06 00:48

ふふふ。ひっかかったか。

Perlは三項演算子を左辺値として使える。
って全然利用価値はないけど、知ってるか試しただけ。

**nobodyさん** · 03/03/06 00:49

あぁ。$a ? $b : $c だな。・・

**nobodyさん** · 03/03/06 01:02

>>150
ひっかかってた俺様晒しage

**nobodyさん** · 03/03/06 01:05

>>152
(　´,_ゝ`）ﾌﾟ

俺様 · 03/03/06 01:07

>>150
何が引っかかったのかよくわからん。
>>145は逆だからかエラーでてるし。

俺様 · 03/03/06 01:13

>>150
とりあえず
$a ? $b : $c = 1;
って正しく書いてくれたら面白かったのに。
まあ、またそういうのがあったら引っ掛けてみてクレイ。

**nobodyさん** · 03/03/06 01:22

>>150
気持ちわりぃ～・・・・(文法が)

俺様 · 03/03/06 01:34

わからない点が出てきた（汗

$a ? $b : $c = 1;
これは$aがまだ初期化されていないため
falseとみなされて$cに1が代入される。
ところが、
$a=true;
$a ? $b : $c = 1;
このようにしても$bには１が代入されていなかった・・・

ちなみにPerlの場合はちゃんと$bに１が代入されてました。
というわけでどうしてPHPだと代入されないのかを考えて見ましょう。
PerlとPHPの違いですね。

**nobodyさん** · 03/03/06 01:36

俺様に、きもいストカー、スレ繁盛。　　　サラリーマン俳句

**nobodyさん** · 03/03/06 01:41

define("true",0);

**nobodyさん** · 03/03/06 01:42

さっき書いたもので十分。Perlは三項演算子(の2、3番目のやつ)が左辺値になれる。
なんと関数も左辺値にできる(ver 5.6辺り(?)以降から..)

my %hash;
sub hoge : lvalue {
my $key = shift;
return $hash{$key};
}

hoge('test') = 1;
print $hash{test};

**nobodyさん** · 03/03/06 01:43

>>157
あほか？
$a?$b:($c=1);と解釈するからだろ。つーかそれが健全。

**nobodyさん** · 03/03/06 01:52

ごめん。またもや失敗。

return を使ってはいけない。とのこと。

sub hoge : lvalue {
my $key = shift;
$hash{$key};
}

**nobodyさん** · 03/03/06 03:27

C(gcc 2.95.3-6 mingw)はperlと同じ挙動を示した。
こんな書き方があるとは、知らなかった。。

**nobodyさん** · 03/03/06 07:56

わからない点が出てきた（汗

$a ? $b : $c = 1;
これは$aがまだ初期化されていないため
falseとみなされて$cに1が代入される。
ところが、
$a=true;
$a ? $b : $c = 1;
このようにしても$bには１が代入されていなかった・・・

ちなみにPerlの場合はちゃんと$bに１が代入されてました。
というわけでどうしてPHPだと代入されないのかを考えて見ましょう。
PerlとPHPの違いですね。わからない点が出てきた（汗

$a ? $b : $c = 1;
これは$aがまだ初期化されていないため
falseとみなされて$cに1が代入される。
ところが、
$a=true;
$a ? $b : $c = 1;
このようにしても$bには１が代入されていなかった・・・

ちなみにPerlの場合はちゃんと$bに１が代入されてました。
というわけでどうしてPHPだと代入されないのかを考えて見ましょう。
PerlとPHPの違いですね。わからない点が出てきた（汗

$a ? $b : $c = 1;
これは$aがまだ初期化されていないため

**nobodyさん** · 03/03/06 07:56

わからない点が出てきた（汗

$a ? $b : $c = 1;
これは$aがまだ初期化されていないため
falseとみなされて$cに1が代入される。
ところが、
$a=true;
$a ? $b : $c = 1;
このようにしても$bには１が代入されていなかった・・・

ちなみにPerlの場合はちゃんと$bに１が代入されてました。
というわけでどうしてPHPだと代入されないのかを考えて見ましょう。
PerlとPHPの違いですね。わからない点が出てきた（汗

$a ? $b : $c = 1;
これは$aがまだ初期化されていないため
falseとみなされて$cに1が代入される。
ところが、
$a=true;
$a ? $b : $c = 1;
このようにしても$bには１が代入されていなかった・・・

ちなみにPerlの場合はちゃんと$bに１が代入されてました。
というわけでどうしてPHPだと代入されないのかを考えて見ましょう。
PerlとPHPの違いですね。

**nobodyさん** · 03/03/06 07:59

粘着きもいお（○´∞｀○）

俺様 · 03/03/06 08:26

>>161
http://www.php.net/manual/ja/language.operators.php
演算子の優先順位が
=より：?の方が高いから
$a?$b:$cの方が$c=1より先に評価されるはずじゃない？

でもこうやってみたら$aが真のときに
$bに１が代入されてたからやっぱ>>161のいう通りかな。
$a ? $b = 1: $c;
しかし、いいかげんな仕様だね。

**nobodyさん** · 03/03/06 08:29

>>161
http://www.php.net/manual/ja/language.operators.php
演算子の優先順位が
=より：?の方が高いから
$a?$b:$cの方が$c=1より先に評価されるはずじゃない？

でもこうやってみたら$aが真のときに
$bに１が代入されてたからやっぱ>>161のいう通りかな。
$a ? $b = 1: $c; >>161
http://www.php.net/manual/ja/language.operators.php
演算子の優先順位が
=より：?の方が高いから
$a?$b:$cの方が$c=1より先に評価されるはずじゃない？

でもこうやってみたら$aが真のときに
$bに１が代入されてたからやっぱ>>161のいう通りかな。
$a ? $b = 1: $c; >>161
http://www.php.net/manual/ja/language.operators.php
演算子の優先順位が
=より：?の方が高いから
$a?$b:$cの方が$c=1より先に評価されるはずじゃない？

でもこうやってみたら$aが真のときに
$bに１が代入されてたからやっぱ>>161のいう通りかな。
$a ? $b = 1: $c;

**イ奄様** · 03/03/06 09:07

これで勘弁してくれ
Perl
$a?$b:$c=1;
PHP
$a?$b=1:$c=1;

俺様 · 03/03/06 09:53

では今日はフォームの受け渡しを書いておこう。

まずはhtml部分から。

<form action="../cgi-bin/test.cgi" method="POST">
名前: <input type="text" name="name" /><br>
性別: <br>
<input type="radio" value="男" name="sex" checked>男<br>
<input type="radio" value="女" name="sex">女<br>
<input type="submit" name="送信">
</form>

俺様 · 03/03/06 10:10

Perlだとこうなる。

#!/perl/bin/perl
print "Content-type: text/html\n\n";
use CGI;
$q = new CGI;
print $q->param('name')."は".$q->param('sex');

まあ、cgi.pmがPerl5で標準に組み込まれるようになったので
かなり楽になっただろう。
cgi.pmを用いないとさらに面倒である。

俺様 · 03/03/06 10:17

PHPの場合だとこれでよい。
<?php
print $_POST["name"]."は".$_POST["sex"];
?>

ちなみにGET方式の場合は同様に
$_GETの配列に代入される。

$_REQUESTにはGET,POST関係なく
代入されてくれる。（ただし、安全じゃないという理由で推奨はされない）

俺様 · 03/03/06 10:29

http://www.php.net/manual/ja/ref.strings.php
文字列関数を見るとわかるがかなり便利な関数が標準で用意されている。

htmlspecialchars
特殊文字をHTMLエンティティに変換する
例えば、<を'<'に変えてくれるのだ。
タグとみなされずにすむ。

trim
文字列の先頭および末尾にあるホワイトスペースを取り除く
これもフォーム処理の際にはあると便利だろう。

こんなふうにすればフォームから受け取った全ての値に
簡単に処理を適用できる。
$_POST = array_map("htmlspecialchars", $_POST);
$_POST = array_map("trim", $_POST);

俺様 · 03/03/06 10:30

これでフォームもバッチリъ( ﾟｰ^)だろう。

**nobodyさん** · 03/03/06 11:23

a?b:c=1;
本来はエラーにすべきだけど、gccだと通るんだよな・・・三項演算子が左辺になりうる。
まあ-ansi -pedanticをつければエラーにしてくれるけど。

**175** · 03/03/06 11:28

s/左辺/左辺値/

**nobodyさん** · 03/03/06 15:41

いい加減な仕様とか言って・・

演算子の優先順位も、左辺値になるということも、
perlopにちゃんと書いてあるし。ちゃんとした仕様。

仕返しだ。

$a ? $b : $c = $d ? $e : $f = $g ? $h : $i = $j ? $k : $l = $m ? $n : $o;

俺様 · 03/03/06 16:42

>>177
いや、いい加減な仕様ってのは今回に限ってはPHPに対していったのさ。
>>157で言ったようにPerlの場合は予想したとおりになったからね。

俺が言いたかったのはPHPの場合が>>161みたいになっているのが
いい加減だなあってことだ。

**nobodyさん** · 03/03/06 17:01

PHPも、優先度は、=の方が上だから、そのままの結果。ではないのか?

俺様 · 03/03/06 17:04

>>179
＞優先度は、=の方が上
ソースｷﾎﾞﾝﾇ。
俺が調べた結果だと=の方が下だった。

**nobodyさん** · 03/03/06 17:05

◆ようこそ！！ピンクエンジェルです★
http://www.pink-angel.jp/betu/index.html

**nobodyさん** · 03/03/06 17:06

本来はd=a?b:c;という形で使う者なんだから、=の方が低くて当然。
左辺値になるってのがおかしいんだよ(-_-;)

**nobodyさん** · 03/03/06 19:06

>>180
あぁ。最低から並べたものって書いてあった。うぅ。

**nobodyさん** · 03/03/06 21:36

180 名前：俺様投稿日：2003/03/06(木) 17:04 ID:SMJB497B
>>179
＞優先度は、=の方が上
ソースｷﾎﾞﾝﾇ。
俺が調べた結果だと=の方が下だった。

181 名前：nobodyさん投稿日：2003/03/06(木) 17:05 ID:G2YpYyeT
◆ようこそ！！ピンクエンジェルです★
http://www.pink-angel.jp/betu/index.html

182 名前：nobodyさん投稿日：2003/03/06(木) 17:06 ID:???
本来はd=a?b:c;という形で使う者なんだから、=の方が低くて当然。
左辺値になるってのがおかしいんだよ(-_-;)

183 名前：nobodyさん投稿日：2003/03/06(木) 19:06 ID:???
>>180
あぁ。最低から並べたものって書いてあった。うぅ。

182 名前：nobodyさん投稿日：2003/03/06(木) 17:06 ID:???
本来はd=a?b:c;という形で使う者なんだから、=の方が低くて当然。
左辺値になるってのがおかしいんだよ(-_-;)

183 名前：nobodyさん投稿日：2003/03/06(木) 19:06 ID:???
>>180
あぁ。最低から並べたものって書いてあった。うぅ。

**nobodyさん** · 03/03/06 23:54

教えて下さい。
配列@arrayに、'12-34','34-56'...みたいなデータが入ってて、-の右側でソートしたい場合、

@tmp = map { (split /-/)[1] } @array;
@array = @array[ sort { $tmp[$b] <=> $tmp[$a] } 0 .. $#tmp ];

でやってたんですが、同じことをPHPでやるにはどうしたらいいんでしょう？

俺様 · 03/03/07 00:46

>>185
実はそれに似たようなので、俺様も苦労したんだな～

1<>32<>43<>2
3<>41<>443<>232
...
ってな感じでデータが入ってて
３列目（上だと43,443）だけでsortしたいなーって。
で、結局よくわからんかったから自己関数作った。

function cmp ($a, $b) {
$tmp1 = explode("<>", $a);
//文字列$a（="1<>32<>43<>2"）を<>で区切って配列に代入
//例えば、$tmp1[0]=1,$tmp1[1]=32
$tmp2 = explode("<>", $b);
if($tmp1[2] == $tmp2[2]) return 0;
elseif($tmp1[2] > $tmp2[2]) return -1;
else return 1;
}

usort ($array "cmp");
//ユーザー定義の比較関数により値で配列をソート

まあ、usortの使い方とかはマニュアルで調べてクレイ。
http://www.php.net/manual/ja/ref.array.php

俺様のと若干違うようなので、もっと簡単な方法があるかも知れんが
参考までに。

**nobodyさん** · 03/03/07 00:46

教えて下さい。
配列@arrayに、'12-34','34-56'...みたいなデータが入ってて、-の右側でソートしたい場合、

@tmp = map { (split /-/)[1] } @array;
@array = @array[ sort { $tmp[$b] <=> $tmp[$a] } 0 .. $#tmp ];

でやってたんですが、同じことをPHPでやるにはどうしたらいいんでしょう？教えて下さい。
配列@arrayに、'12-34','34-56'...みたいなデータが入ってて、-の右側でソートしたい場合、

@tmp = map { (split /-/)[1] } @array;
@array = @array[ sort { $tmp[$b] <=> $tmp[$a] } 0 .. $#tmp ];

でやってたんですが、同じことをPHPでやるにはどうしたらいいんでしょう？教えて下さい。
配列@arrayに、'12-34','34-56'...みたいなデータが入ってて、-の右側でソートしたい場合、

@tmp = map { (split /-/)[1] } @array;
@array = @array[ sort { $tmp[$b] <=> $tmp[$a] } 0 .. $#tmp ];

でやってたんですが、同じことをPHPでやるにはどうしたらいいんでしょう？教えて下さい。
配列@arrayに、'12-34','34-56'...みたいなデータが入ってて、-の右側でソートしたい場合、

@tmp = map { (split /-/)[1] } @array;
@array = @array[ sort { $tmp[$b] <=> $tmp[$a] } 0 .. $#tmp ];

でやってたんですが、同じことをPHPでやるにはどうしたらいいんでしょう？

**nobodyさん** · 03/03/07 03:08

配列にしてからソートした方がよくない？

**nobodyさん** · 03/03/07 14:44

>>185
Perlならこれでいいんじゃない?

@array = sort { (split(/-/,$a))[1] <=> (split(/-/,$b))[1] } @array

**nobodyさん** · 03/03/07 16:22

>>185

$i = 0;
for($array[$i]) {
list($first, $second) = explode("-",$array[$i]);
$first[] = $first;
$secondt[] = $second;
$i++;
}

array_multisort($second, $first);

$i++;
while ($first[$i]){
$array[$i] = $first[$i] . "-" . $second[$i];
$i++;
}

PHP初心者スレで書いた奴を改善してみた。

**nobodyさん** · 03/03/07 18:15

>189
ソートの度になにかの処理をするって遅くならん？

**$n日後** · 03/03/07 18:53

現在時刻から$n日後を求めたいいいだけどprelだと以下
($sec,$min,$hour,$mday,$mon,$year,$wday)=localtime(time + $n*24*3600);
PHPだとどうなるんだ？
あのツェラーの公式だっけか？

**nobodyさん** · 03/03/07 18:56

>>192
>$n日後

なら純粋にtime()に86400 * nを足せばいいのでは？

**nobodyさん** · 03/03/07 19:23

$i = 90;

$year = date("Y", time());
$day = date("n", time());
$month = date("j", time());
$hour = date("G", time());
$minute = date("i", time());
$second = date("s", time());

$timestamp = mktime($hour, $minute, $second, $month, $day + $i, $year);

print date("Y/n/j G:i:s", $timestamp);

まぁ別に変数を使う必要も無いわけだが。

**$n日後** · 03/03/08 13:58

>>193 >>194
レスサンク！
ツェラーの公式とはまた違うか、・・・・。
PHPではツェラーの公式なんか使わなくても簡単に指定した日の
曜日とかも算出出来ちゃうんだね。
--抜粋--
また、カレンダー等でその日の曜日を知りたい時、「perl」では
Zeller（ツェラー）の公式を使って算出しなければいけませんが、
「php」では「string date (w , [timestamp])」とすると、
「timestamp」で指定した日にちの曜日を数字で返してくれます
（0(日曜)～6(土曜)）。極端な例を２点ほどあげましたが、
他にも便利な関数が数々あります。
--抜粋--
ttp://bin5.info/useful/php/php_02.html

**nobodyさん** · 03/03/08 13:59

>>195
質問が変わっている。

**$n日後** · 03/03/08 14:09

>>196
いやいや、これはこれであれはあれで・・・
失礼すました。

**nobodyさん** · 03/03/08 14:32

Perlの場合、自前で計算したくないなら、Date::Calcを使えばいい。

>>194の回答はアホ過ぎ。timeの戻り値がシリアル値なんだから、
その性質を使わないのは勿体無い。

**nobodyさん** · 03/03/08 15:29

>>193
うるう秒はどうするの？

**nobodyさん** · 03/03/08 15:35

>>199
うるう秒の意味わかってるか？
で、それをどうしたいのか？