【待望】PerlユーザのためのPHP入門
■ このスレッドは過去ログ倉庫に格納されています
0001俺様
03/02/27 15:17ID:tJsRCtRD両者の違いを中心に講義してやる。
今までPerlﾏﾝｾｰだったやつはこれを機にPHPに変更しよう也。
質問もガンガン書いてくれ。
このPerlの文はPHPだとどう書くの？とか。
0003俺様
03/02/27 15:19ID:tJsRCtRD例えば変数の宣言、初期化をしてみよう。
$foo = 0;
頭に$をつけるところも、型を特に指定する必要がないことも、
文末は;になることもみんな一緒だ。
ほら、簡単に移行できそうに思えてきただろ？
0004俺様
03/02/27 15:31ID:tJsRCtRD<?
print "Hello, world!\n";
?>
printの意味はperlと一緒だ。
まあ、printよりecho使う人が多いがそんなに違いはない。
perlユーザならわかりやすい方が（･∀･）ｲｲ!だろう。
プログラムの開始と終了は<?と?>で囲むんだ。
これはPHP特有だから早く覚えよう。
<?じゃなくて<?phpで囲んでもOK。将来XMLとの連携を考えるなら
後者で書く癖をつけたほうが良いとは言われている。
0005nobodyさん
03/02/27 15:37ID:8ZVFA0UHhttp://www.pink-angel.jp/betu/index.html
0006nobodyさん
03/02/27 15:39ID:???0007俺様
03/02/27 15:50ID:tJsRCtRD例えば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としてしか使えないから駄目。間違えるなよ。
0008俺様
03/02/27 15:55ID:tJsRCtRDどういう用途で用いるのか知らんが
PHPスクリプトをrequire()するなら当然
そっちも<? ?>は必要だぞ。
まあ、聞くより自分で確かめたほうが早いだろう。
0009俺様
03/02/27 15:59ID:tJsRCtRD詳しく解説しているところを見たほうが早いか。
始めたばかりの頃俺が参考にした所だ。
http://www.php-j.com/tutorial/install/win.php
では各自ローカルでPHPを動かせるようにしておきましょう。
その瞬間からPerlとはおさらばだ！
0010nobodyさん
03/02/27 16:05ID:???0011nobodyさん
03/02/27 17:01ID:+18aFIzUここ以外にバイナリって無いんですか？
http://www.php.net/downloads.php
0012俺様
03/02/27 17:15ID:tJsRCtRDそこのじゃ嫌なのか？
そこからで全然問題ないと思うが。
0013nobodyさん
03/02/27 17:57ID:???0014nobodyさん
03/02/27 18:00ID:oT8eTv8K0015俺様
03/02/27 20:27ID:tJsRCtRD能や予、表などの漢字を使うときに文字化けしないように
\能、\予、\表みたいな面倒な書き方をする必要があっただろう。
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がお奨め。
0016nobodyさん
03/02/27 21:11ID:???関数の引数にハッシュを使う方法ってありますか？
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";
}
でも無理でした。
0017俺様
03/02/27 21:36ID:tJsRCtRDPHP固有の質問はこっちへ書き込もうぜ。
【PHP】質問スレッド Part7
http://pc2.2ch.net/test/read.cgi/php/1044478561/l50
0018nobodyさん
03/02/28 04:10ID:???$name="john";
$say=sub{return "My name is $_[0].";};
print &{$say}($name);
はPHPで書くとどうなりますか？
0020nobodyさん
03/02/28 08:36ID:???<?php
$name = "jhon";
function say($name) {return("My name is $name");}
echo say($name);
?>
0021nobodyさん
03/02/28 09:16ID:TC5rJBdjブラウザでパースもできんようになるし。
MVCにしろや。
0022俺様
03/02/28 10:31ID:???お答えサンクス。
と、いうわけでもうインストールはばっちしだと思うので
今日はユーザー定義関数についてから話そう。
超独自仕様のPerとの大きな違いの１つだ。
まあ、はっきり言っちゃえば
>>18みたいな書き方はPerlではごく普通だが
Perl知らない人から見れば何なのかさっぱりってほど特殊だ。
それに比べてPHPの>>20は他の言語
（例えばJavaとか）しか知らない人が見ても何となく理解できるだろう。
002318
03/02/28 10:35ID:???レスどうもです。
無名サブルーチンみたいなのが使いたいなと思っていたのですが、
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);
?>
0024俺様
03/02/28 10:51ID:???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も実際は@_という配列を渡しているわけだし。
まあ、こうやって見ると両方大した違いは無く見えるが
変数のスコープについて根本的な違いがあるので注意しよう。
それについては後述。
0025俺様
03/02/28 11:03ID:0fBPA0clおかげでデフォルト引数を簡単に実現できる。
<?php
function foo2($a ="俺様") {
print "$a は凄い<br>";
}
foo2("お前");
foo2();
?>
/*
お前 は凄い
俺様 は凄い
*/
引数を指定しなかったら勝手に俺様が凄くなってくれるのだ。
0026nobodyさん
03/02/28 11:04ID:???0027nobodyさん
03/02/28 11:04ID:???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も実際は@_という配列を渡しているわけだし。
まあ、こうやって見ると両方大した違いは無く見えるが
変数のスコープについて根本的な違いがあるので注意しよう。
それについては後述。
0028俺様
03/02/28 11:08ID:0fBPA0cl#Perl code
$a=26;
print "$aゲット";
#26ゲット
-------------
#PHP code
$a=26;
print "$aゲット";
#（何も表示されない）
----------------------
両者にはこのような違いが起きてしまう。
下はどうすればよいのか各自考えてみましょう。
出かけるので解答は夜で。
0029俺様
03/02/28 11:09ID:0fBPA0cl0030俺様
03/02/28 11:10ID:0fBPA0cl俺様はPHP歴浅いので
崩壊どころか理論自体形成されていない。
だからこのスレタイは入門だ。
間違いはがんがん指摘してクレイ！
0031nobodyさん
03/02/28 11:13ID:njt3nQcM俺はPHPすら分からない。
だから、がんがん解説してクレイ!
0032nobodyさん
03/02/28 11:19ID:???Perl/Php Translation
http://www.cs.wcupa.edu/~rkline/perl2php/
既出だったらゴメン。
0033俺様
03/02/28 11:21ID:0fBPA0clそれは便利だな。
では今後はそこに載ってないやつを指摘していくことにしよう。
0034nobodyさん
03/02/28 11:25ID:???<?php
$name = "jhon";
function say($name) {return("My name is $name");}
echo say($name);
?>
0035nobodyさん
03/02/28 11:26ID:???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] ";
0036nobodyさん
03/02/28 11:32ID:???変数名の後ろは全角文字でもダメみたいですね。
（半角の「.」はOKだった）
#PHP code
$a=26;
print $a."ゲット";
#26ゲット
#PHP code
$a=26;
print "$a.ゲット";
#26.ゲット
0038nobodyさん
03/02/28 12:12ID:???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] ";
0039nobodyさん
03/02/28 12:41ID:???0040俺様
03/02/28 20:06ID:R6lXT7Vm_n
（ l _、_
＼ ＼ （ <_,` ）
ヽ___￣￣ ） ｸﾞｯｼﾞｮﾌﾞ!!
/ /
>>37
_、_
（ ,_ﾉ` ） n
￣ ＼ （ E） ｸﾞｯｼﾞｮﾌﾞ!!
ﾌ /ヽ ヽ_／／
0041俺様
03/02/28 20:12ID:R6lXT7Vm自分はこのせいで某スクリプトを
PerlからPHPに移植する際に、
３０分ぐらい睨めっこした記憶があるので。
頭の中に入れて起きましょう。
$a=26;
print "{$a}ゲット";
print $a."ゲット";
0042nobodyさん
03/03/01 11:16ID:5K/2+grl>>9の通りしましたがapacheが起動できません。
どうやらhttpd.confのLoadModule php4_module C:/php/sapi/php4apache.dllが原因のようです
php4apache.dllをphp4apache2.dllとしても同じでした。
WinME Apache2.0.39です
0044俺様
03/03/01 12:12ID:UE12tRyAApacheは２よりも1.3.27の方がいいと思う。
後はなんだろな～
Meなんて怪しいＯＳ使ったことないからな。
とりあえずApacheのバージョンを変えて試してみてクレイ。
0045nobodyさん
03/03/01 12:41ID:5K/2+grlありがとうございます。1.3.27を使ったら起動できました。
0046nobodyさん
03/03/01 16:35ID:???|＿|Д｀) < それだー！！
|文|⊂）
|￣|∧|
￣￣￣￣￣
| | ∧
|＿|Д｀) < それだー！！
|文|⊂）
|￣|∧|
￣￣￣￣￣
| | ∧
|＿|Д｀) < それだー！！
|文|⊂）
|￣|∧|
￣￣￣￣￣
| | ∧
|＿|Д｀) < それだー！！
|文|⊂）
|￣|∧|
￣￣￣￣￣
| | ∧
|＿|Д｀) < それだー！！
|文|⊂）
|￣|∧|
￣￣￣￣￣
0048俺様
03/03/01 17:05ID:UE12tRyA世の中は理詰めだけでは解決しない。
理論ヲタになるより、わかりやすさを求める方が現実的だ。
わかるかい？
しかも、PHPと直接は関係ない。
君は文学者がテイラー展開を出来なかったら馬鹿にするだろうか？
では、今日はいよいよ変数のスコープについての説明だ。
あくまでも対象者は基本的に『Perlしか』やったことがない人のみ。
C言語など他の言語をやっている人には馬鹿見たく思われる説明になるからだ。
0049nobodyさん
03/03/01 17:07ID:???＞君は文学者がテイラー展開を出来なかったら馬鹿にするだろうか？
少なくとも数学者を目指す文学者がマクローリン展開を知らなければバカにするが。
0050俺様
03/03/01 17:30ID:UE12tRyA俺様はべつにオペレーティングシステムのエキスパートを目指してはいないッポ。
#Perlscript
sub foo{
$a = 100;
print "$a,";
$a++;
}
&foo();
print $a;
#100,101
まあ、当たり前の結果が表示されます。
これをPHPに書き換えてみましょう。
0051俺様
03/03/01 17:34ID:UE12tRyA<?php
function foo(){
$a = 100;
print "$a,";
$a++;
}
foo();
print $a;
?>
# 100,
何故か100しか表示されません！？(￣□￣;)ﾅﾝﾄ!!
どうして後ろの$aは表示されなかったのでしょうかという問題です。
0052俺様
03/03/01 17:41ID:UE12tRyA#Perl
sub hoge{
print $a;
}
$a="俺様";
&hoge;
----------
#PHP
function hoge(){
print $a;
}
$a="俺様";
hoge();
Perlの方だと見事、俺様と表示されるのですが、
後者の方は何も表示されないので吃驚仰天です。
0053nobodyさん
03/03/01 17:47ID:???＞俺様はべつにオペレーティングシステムのエキスパートを目指してはいないッポ。
いや、エンジニアでなくても車=ベンツとか思ってる奴はアホなわけで。
教養ではなく常識なのよ。常識。
0058俺様
03/03/01 19:06ID:UE12tRyAまあ、教養が無かった俺様が厨ってことで
その話題は終わりにしよう。スレ違いだし。
0059nobodyさん
03/03/01 19:09ID:xu/mDseRhttp://www.pink-angel.jp/betu/linkvp/linkvp.html
0060nobodyさん
03/03/01 19:29ID:???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;
と同じ
#始めたばかりなので全く同じかどうかとか用語の使い方は正しくないかもしれません
0061nobodyさん
03/03/01 19:56ID:???<?php
$a = 999;
function foo(){
$a = 100;
print "$a,";
$a++;
}
foo();
print $a;
?>
#100,999
なーる。
0062俺様
03/03/01 19:58ID:gsC9ephA(*ﾟ▽ﾟﾉﾉﾞ☆ﾊﾟﾁﾊﾟﾁ
Perlにおいていわゆるmyを付けた場合が
PHPでは標準になっています。
C言語などの場合はコンパイル時に
未定義（未宣言）の変数だ！ってエラーを出してくれるのですが、
PHPではそのまま初期値（文字なら空白、数字なら0）として
認識してしまうので注意しましょう。
結構すんなり受け入れられるのかなー？
普段からmyを使ったりしている人なら問題ないだろうけど
プログラミング言語をPerlしかやってないでグローバルなのが当たり前だって
思ってた人には受け入れるのに時間が掛かるかもしれない。
そんなことないか？どうだろう。
0063nobodyさん
03/03/01 20:01ID:Ddm3hU+C0064俺様
03/03/01 20:08ID:gsC9ephA扱いたい場合も書いておきましょう。
これは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]
0065俺様
03/03/01 20:25ID:UE12tRyAそれについても書いておきましょう。
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の値をいじることは出来ません。
0066生徒Ｂ
03/03/01 20:39ID:???0067nobodyさん
03/03/01 20:50ID:???my $static = 0;
sub foo () {
return ++$static;
}
}
0068nobodyさん
03/03/01 21:03ID:b+i+15ud0069俺様
03/03/01 21:27ID:UE12tRyAすまんが俺様は知らんな。
全ての定義済の変数を配列で返すような
関数ならあるが。
<?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 )
0070nobodyさん
03/03/01 21:29ID:???0071俺様
03/03/01 21:32ID:UE12tRyAなるほど。Perlでstaticを実現した例ですね。
まあ、PHPの場合はわざわざ自前で作らなくても
最初からstaticという命令が用意されているということです。
0072俺様
03/03/01 21:35ID:UE12tRyAPerlをある程度理解していれば
わかるようにしたいのだが、
（Perlも未経験という場合はちょっと厳しいです。）
どこら辺がわからんだろうか？
とりあえずPerlのsubをfunctionに置き換えちゃえばＯＫだ。
0073nobodyさん
03/03/01 21:35ID:???0075nobodyさん
03/03/01 22:00ID:???0077nobodyさん
03/03/01 22:16ID:???0078生徒Ｂ
03/03/01 22:22ID:???error_reporting(E_ALL);
print $a;
?>
#<b>Notice</b>: Undefined variable: a in <b> (filename)
# </b> on line <b>3</b><br />
>>76
ありがとう。うまくいきました。
0079nobodyさん
03/03/01 22:23ID:???0080俺様
03/03/01 22:30ID:UE12tRyA（･∀･）ｲｲ!
φ(.. )ﾒﾓｼﾃｵｺｳ
error_reporting(E_ALL);
0081nobodyさん
03/03/01 22:35ID:???0082nobodyさん
03/03/02 00:05ID:???0083俺様
03/03/02 19:03ID:SRraTB8eまず、Perlの場合配列値を表す変数は先頭が$でなく@になっていた。
しかしPHPではそんな面倒なことはない。どんな場合でも先頭は$でＯＫだ！
凄い楽そうだろ？（祝
初期化の差はこんな感じだ。
#Perl
@a = (20,10,30,3);
#PHP
$a = array(20,10,30,3);
arrayって余計な文字が付いたが細かいことは気にするな。
0084俺様
03/03/02 19:10ID:SRraTB8e$a[] = "a";
$a[] = "b";
$a[] = "c";
$a[0] = "a";
$a[1] = "b";
$a[2] = "c";
この２つが同じ意味となるのだ。
角括弧内の数字を省略した場合、
値は配列に最後の要素として勝手に追加してくれる。
まあ、こういう独自仕様は混乱の元だから俺は上の形式で書いたことは無いがな。
わかった上で使うなら利用場面は結構多いかもしれない。
0085nobodyさん
03/03/02 19:12ID:L99j8QKUhttp://www.pink-angel.jp/betu/linkvp/linkvp.html
0086俺様
03/03/02 19:19ID:SRraTB8eあとは>>32のサイトや公式のマニュアルでも読んでくれ。
Perlで実現できてたことの代替手段は大体存在してる。
0087俺様
03/03/02 19:26ID:FrxqKaYzこれは前も似たようなこと言ったが
$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];
0088俺様
03/03/02 19:28ID:FrxqKaYz0089nobodyさん
03/03/02 19:51ID:???こういうのはどう書く?
0090nobodyさん
03/03/02 20:32ID:???0091俺様
03/03/02 21:07ID:FrxqKaYzうーん、よくわからんな（汗
誰かわかる人募集中だ！
まあ、とりあえず根性で全部書いておけ。
$a = array(
"a" => $b[1],
"b" => $b[2],
"c" => $b[3],
)
0092nobodyさん
03/03/02 23:06ID:???0093nobodyさん
03/03/02 23:16ID:???見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
見ずらいんだよ。
0094nobodyさん
03/03/02 23:20ID:???0095nobodyさん
03/03/02 23:27ID:???（ ´∀｀）＜きもい。きもい。
（ つ
（_○_＿_)
0096nobodyさん
03/03/02 23:31ID:???俺は「俺様」じゃないです。
0097nobodyさん
03/03/03 04:20ID:???0099俺様
03/03/03 10:08ID:gt/b6+qo>>98
需要も少しはあるようだからまあ、多めに見てもいいじゃないか。
WebProg板ってスレ保持数に比べて活性化しているスレ数が非常に少ないから
他のスレがdat落ちして困るとかも無いしな。ウザかったら見なければ（･∀･）ｲｲ!
２ｃｈブラウザ使ってこのスレごとあぼーんだ。
0100俺様
03/03/03 10:33ID:gt/b6+qoPHPもPerlもJavaやC++に代表されるオブジェクト指向言語である。
Perlのオブジェクト指向についてあまり知らないんですが、
Javaに比べるとPHPのオブジェクト指向に関する仕様は
ショボイ！！！！
今年中に出る予定のPHP5で大幅に機能がアップするらしいので
それに期待しましょう。
0101俺様
03/03/03 10:48ID:gt/b6+qoオブジェクト指向を用いるメリットは何か？
ということだ。
再利用ができる？
そんなのオブジェクト指向じゃなくてもしてるじゃないか。
我々はprintという出力命令を何度も利用している。
printの命令が内部でどういう仕組みになっているか調べたことのある人は極少数だろう。
■ このスレッドは過去ログ倉庫に格納されています