【待望】PerlユーザのためのPHP入門 (601レス)
1-

295: 03/03/28 18:00 ID:56FSUIhD(2/3) AAS
既出だけど、三項演算子のネストではまった事あったのでそのときの教訓。
Perl と PHP では、演算子の優先順位に結構違いがあるので
一度目を通しておこう。

$r =
 ($foo < $bar) ? "LESS" :
 ($foo > $bar) ? "GREATER" :
 "EQUAL";
296
(1): 03/03/28 18:49 ID:56FSUIhD(3/3) AAS
>> 282
php -l script.php

-w は、error_reporting(E_ALL); に相当?(かな?)
Taint モードについては、私も前に探したことあるけどPHPには見つけられなかった。
汚染チェックは、自主的にそういう習慣を身につけるしかないのかな。
297
(2): 03/03/28 19:00 ID:??? AAS
@sortdata = sort { (split(/\,/,$a))[2] <=> (split(/\,/,$b))[2] } @hogehoge;
Perlでいう↑みたいなことはPHPではどうやればできますか?
298: 03/03/28 19:19 ID:??? AAS
>>296
おぉ、回答ありがとう。
299: 03/03/28 20:35 ID:/IEo7+Sn(1) AAS
AA省
300: 03/03/29 13:38 ID:CQcFf7wk(1) AAS
>>294
回答ありがとう。
301
(1): 03/03/29 18:28 ID:??? AAS
%hash = map { $_ => 1 } @list;
とか、
@hash{@list} = (1) x @list;
Perlでいう↑みたいなことはPHPではどうやればできますか?
302
(1): phpformperl 03/03/29 20:26 ID:kc16+nkl(1) AAS
手本になるようなきれいなPHPコードどれかしってまっか?
やっぱxoopsでっか?
303
(1): 03/03/29 22:26 ID:??? AAS
>>302
XOOPSを積極的に弄っている身としては残念なことだが、
決してきれいなコードではないし、流れを追うのも面倒。
過去のしがらみとかあるので大きく変えられないことや、
複数人で作っているが、細かい部分で明確な規定がある訳ではないので
コア、標準モジュール、果ては標準外の勝手モジュールまで入れると
コードの統一はされていないと思っていい。
フレームワークとしては非常に緩いのでモジュールのコードまで
含めるのは本来フェアではないのだが。

あとJpGraphもコードはちょっとね。便利に使わしてもらってますけど。
304: phpfromperl 03/03/30 13:14 ID:fNA6Ajxw(1) AAS
>>303
サンクス
とりあえず手本にさせてもらいます。
いろいろ仕掛けをつけやすそうだし。
ほかよりましなようなので。
305
(1): 03/03/30 21:07 ID:??? AAS
sub test {
 my $num = 0;

 return sub {
  $num += shift if @_ == 1;
  return $num;
 }
}
Perlでいう↑みたいなことはPHPではどうやればできますか?
306: [深読みしてみる] 03/03/31 00:21 ID:??? AAS
>297,301,305
PHPでFP(関数プログラミング)でもやりたいのかな?

lambda 代わりに create_function,
array_(map|reduce|filter) 後、array_walk, usort。
で、大体御希望の事は出来ると思います。

ただし、…前にも書いたけど &&, || が倫理値を返したり、
…かといって三項演算子を使おうとすると今度は演算子の優先順位が違ったり、
他にも変数のスコープ等、細かな違いがいろいろ有るので、
PHPでのFPはあまりお勧めしない。素直にパラダイムシフトした方が良いと思う。

例えば >305 だと、
省12
307: 03/03/31 00:21 ID:D273gBu9(1) AAS
# 突っ込まれるかもしれないので、一応補足。
現行のバージョンのPHPでは、すべてpublicメンバになるので、
$numへ直接アクセスすることが可能。(Perlのオブジェクトでも同様だよね)
現状(PHP4)では、完全に隠蔽することは出来ない。…はず。(PHP暦浅いので自信なし。フォロー求)

# 外部リンク[txt]:www.php.net を読んだところ、
# zend2 engine/PHP5? では private が使えるらしい。
308: 名無しさん@Emacs 03/03/31 17:22 ID:mhlggPCn(1) AAS
perldoc モジュール名、perldoc -f 関数名に該当する PHP のやり方って
なんでしょうか?
309: 03/03/31 18:46 ID:??? AAS
php.netで検索する。
310
(1): [さげ] 03/04/01 02:03 ID:??? AAS
ブラウザのアドレス欄に
php.net/関数名
pear.php.net/モジュール名
311: 03/04/01 18:35 ID:??? AAS
倫理値w
312: [age] 03/04/01 19:21 ID:??? AAS
ぷりぃず、晒さないでw
訂正 s/イ/言/
313: <> 03/04/01 20:18 ID:iGZ3zwAc(1) AAS
>310

ローカルには作れんもんでしょうか?
ADSL でも結果が出るまでの "待ち" が気になるの。
314
(1): 生徒1 03/04/01 23:58 ID:2arYjAuZ(1) AAS
foreach (@pairs) {
($name,$value) = split(/=/);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
&jcode'convert(*value, "sjis", "", "z");
$value =~ s/&/&/g;
$value =~ s/</</g;
$value =~ s/>/>/g;
$value =~ s/"/"/g;
$value =~ s/\r\n/<br>/g;
省5
1-
あと 287 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.007s