【待望】PerlユーザのためのPHP入門
■ このスレッドは過去ログ倉庫に格納されています
0001俺様
03/02/27 15:17ID:tJsRCtRD両者の違いを中心に講義してやる。
今までPerlマンセーだったやつはこれを機にPHPに変更しよう也。
質問もガンガン書いてくれ。
このPerlの文はPHPだとどう書くの?とか。
0415nobodyさん
03/07/31 09:22ID:???× ./index.html
ってのが前あった。
0416山崎 渉
03/08/02 02:23ID:???( ^^ )< ぬるぽ(^^)
0417ぼるじょあ ◆ySd1dMH5Gk
03/08/02 04:51ID:???ピュ.ー ( ・3・) ( ^^ ) <これからも僕たちを応援して下さいね(^^)。
=〔~∪ ̄ ̄ ̄∪ ̄ ̄〕
= ◎――――――◎ 山崎渉&ぼるじょあ
0418nobodyさん
03/08/03 03:36ID:e6CW3yAEあげとく
0419nobodyさん
03/08/15 21:51ID:/UWm9DVh0420山崎 渉
03/08/15 22:25ID:???│ ^ ^ │<これからも僕を応援して下さいね(^^)。
⊂| |つ
(_)(_) 山崎パン
0421nobodyさん
03/08/28 08:28ID:aKTRoIJTPerl
use lib './lib/';
use Hoge;
PHP
define( 'LIB_DIR', './lib/' );
include( LIB_DIR . 'Hoge.class.php' );
とやってるんだけど、もうちっと短く書きたいなぁ。
0422nobodyさん
03/08/30 22:41ID:AS3I0NRvPerlでいうところのプログラミングPerlみたいな
大御所のこれさえ買っとけばたいてい載ってるって本きぼん。
0423nobodyさん
03/08/30 23:14ID:AIvW/87l大人の時間ドットNET
http://2ch.otona-no-jikan.net
0424nobodyさん
03/08/31 13:22ID:AiCjBA+L赤マンモス
0425nobodyさん
03/09/07 01:36ID:???プログラム中にHTML書いてあったら落ち着かない
0426nobodyさん
03/09/07 01:56ID:1pDZ49hH0427nobodyさん
03/09/10 00:04ID:EKqTJkq7perlで検索で、$find_lineの中に、$f_a_wordが含まれているかを
if (index($find_line,$f_a_word) >= 0) {
含まれている
} else {
含まれていない
}
このようにしていたのですが、phpだとどのようになりますか?
0428427
03/09/10 00:42ID:???失礼しました。
0429nobodyさん
03/09/10 01:08ID:???これじゃだめかな?
やってみてくりくり
<?php
$find_line = "これはテソトです。";
$f_a_word = "テソト";
if(strstr($find_line,$f_a_word)){
echo '$find_lineの中に$f_a_wordは含まれています!';
}
else{
echo '$find_lineの中に$f_a_wordは含まれていません!';
}
?>
0430429です
03/09/10 01:20ID:z4dT6uSf427-428宛のレスです。
OpenJaneって番号ズレるのね。。。
0432nobodyさん
03/09/10 10:21ID:???0433nobodyさん
03/09/11 23:16ID:???> PHPでOOPでもと思い、
インクルードパスの設定とOOPには何の関係もない。
‥‥‥というのはともかく、auto_prepend でググれ。
0434nobodyさん
03/09/20 14:31ID:???おかげで分からなかった事も分かりました。ありが�d
0435nobodyさん
03/09/20 22:34ID:VeIFc9WRただし、.や..や.htaccessといった、「.」で始まるファイルは対象外にしたいのです。
Perlで
---
opendir(DIR, $path);
@list = sort grep(!/^?./, readdir(DIR));
closedir(DIR);
と書くところを、phpではどのように表現すればよいのでしょうか?
0437とおりすがり
03/09/21 03:57ID:???自信ないが
$dh = opendir($path);
while ($tmp = readdir($dh)) $filename[] = $tmp;
$filename = preg_grep("/^[^\.]/", $filename);
sort($filename);
closedir($dh);
0438nobodyさん
03/09/21 19:51ID:???0439nobodyさん
03/09/22 04:27ID:PmE0lLf0なるほど。このコード実行してないんであれですが、
preg_grep する前に $filename[] = $tmp しちゃうと、
配列$filename内には「.」や「..」が残りそうな雰囲気が…違ったらごめん。
こんな感じにしてみました。
---
if( false !== ($handle = opendir($query_path)) ){ //ディレクトリが開けるなら
while( $file = readdir($handle) ){
if( preg_match ("/^?./", $file) ){
$files[] = $file;
}
}
closedir($handle);
if( count($files) >= 1 ){
sort($files);
}else{
print "このディレクトリ内に読めるファイルはありません?n";
}
}
つーかnatsortって便利ですな。
http://search.net-newbie.com/php/function.natsort.html
正規表現が分からない時はこんなのもアリかな。
while ( $entry = readdir($dh ) {
if ( substr($entry, 0, 1) != '.' )
$files[] = $entry;
}
http://jp.php.net/substr
0442nobodyさん
03/09/22 11:22ID:???0443nobodyさん
03/09/22 16:10ID:???0445nobodyさん
03/09/25 23:55ID:???perlの場合のflock関数と比較して、
phpのflock関数を使うときの注意点って、特になんか、ありますか?
(ウェブサーバは、Apacheという前提です)
0446445
03/09/28 00:48ID:lxnHIT500447nobodyさん
03/09/28 02:01ID:???0448nobodyさん
03/09/28 02:26ID:???にたようなもんじゃないのかな?
たしか、PHPマニュアルにもflock関数は全ての環境で使えるもんじゃ
ないみたいなこと書いてあったし、
ネットワークファイルシステムに対応してないけりゃ、無理だろうし。
ちなみに、うぇぶさばは関係ないですぞ。
0449445
03/09/28 03:46ID:???ども。のぞいてきます。
>>448
そうですね。
よく考えりゃ、どっちもOSのflockを呼び出してるってことだから、
特段変わることはないか。。。
>ちなみに、うぇぶさばは関係ないですぞ。
いや、マニュアル
http://www.php.net/manual/ja/function.flock.php
に、
「いくつかのオーペレーティングシステムでflock() はプロセスレベルで実装されています。
ISAPIのようなマルチスレッド 型のサーバーAPIを使用している場合、
同じサーバーインスタンスの並 列スレッドで実行されている他のPHPスクリプトに対してファイルを保 護する際に
flock()を使用することはできません」
って書いてあったから、
ウェブサーバにIIS使ってると、事情が違うのかなと思って一応かいといたもんで。。。
(正直IIS分からんですが)
0450nobodyさん
03/09/28 09:23ID:???0451445
03/09/28 22:34ID:jyRnC+Ifあれ、なんかとぼけたこと自分言ってました?
ご指摘きぼんぬ
0452nobodyさん
03/09/29 10:34ID:???あまり気にする事は無いかと
マルチスレッド型を利用している場合、別々に動作している
phpは同一プロセス(の、別スレッド)で動作している事になるので
プロセス単位で排他をかけるflock()は排他の目的には使えない
ということで、HTTPdとphpの組み合わせによる、というのは正しいかも
0453nobodyさん
03/10/07 22:48ID:???0454nobodyさん
03/10/07 23:44ID:???みたいなマルチバイト文字列の置換をPHPでやるにはどうしたらいいんでしょうか。
mb_ereg_replaceはまだ実験段階らしいのであまり乗り気ではなく。
0455nobodyさん
03/10/08 00:11ID:???str_replaceでも「とりあえずは」OK。
それか、文字列をUTF-8に変換してから
$str_utf8 = preg_replace("/pattern/u", "replace", $str_utf8);
でもOK。
ただしmb_ereg_replaceはライブラリのライセンス絡みでもめてたけど
関数自体は十分実用に耐えるよ。
ライブラリの変更はPHP5で行われ、ユーザレベルでの変更は
不要になる方向らしいから気にすることは無いと思うけど。
ちなみにmb_ereg系を使うときはmb_languageとmb_internal_encodingを
ちゃんと設定していないと駄目。
0456454
03/10/08 00:30ID:???詳細なレスありがとうございます。
試しにpreg_replaceを使った時えらく文字化けしたのでなんでだろと疑問だったんですがこれで解決しました。
一応マルチバイト文字列関数用にphp.iniの設定は書き変えてあるので、
mb_ereg_replaceを使っても将来的に問題ないということならこれでいこうかなと思います。
0457nobodyさん
03/10/18 23:15ID:???他にも$a,$b,@c,$d,…と並べて@cの内容が展開されるようにしたい時とか.
0458nobodyさん
03/10/27 17:51ID:???http://www.din.or.jp/~ohzaki/perl.htm
をPHPにコーディングしなおしたサイトを誰かしりません?
無いかなー。
0459nobodyさん
03/10/28 18:22ID:???$a =~ tr/[a-z][A-Z]/[A-Z][a-z]/;
print "content-type:text/html\n\n";
print "$a";
上のコードをPHPに移植し、
$a="abcdABCD";
$a=strtr($a, "[a-z][A-Z]", "[A-Z][a-z]" );
echo $a;
と書いてみたところ、strtr()で正規表現が使えないようなのですが
何か良い方法はないですか。
0460nobodyさん
03/10/29 23:14ID:dIX7j6Caphpでそういうモジュールってないでしょうか?
(いやぁ、ほんとはDB使いたいんですけどね。。。わけあってつかえず)
0461nobodyさん
03/11/01 14:03ID:5TPcc+Om0462nobodyさん
03/11/01 14:49ID:???泥臭いけど・・
$a = 'abcdABCD';
$from = implode('',array_merge(range('a','z'),range('A','Z')));
$to = implode('',array_merge(range('A',Z'),range('a','z')));
echo strtr($a,$from,$to);
rangeを使って配列をつくってarray_mergeで配列合体させて
implode(perlでいうところのjoin)で文字列にして置換ってかんじ
連続する文字コードならrangeでいけるよね
0463nobodyさん
03/11/03 00:41ID:4CVQMxAyprint qq|
$hoge
<hr>
<a href="http://www.yahoo.com"></a>
|;
みたいの、phpでないでしょうか?
要は、変数展開もされて、”もエスケープする必要がないように書きたいのですが・・・
0464nobodyさん
03/11/03 00:44ID:???なんか無駄がないか?
0466nobodyさん
03/11/07 15:11ID:GoKF/NURswitch($a) {
case "1" : global $b = "one";
case "2" : global $b = "two";
case "3" : global $b = "three";
}
echo $a." -> ".$b;
みたいなことをやりたいのですが、switch文では無理ですか?
if,elseif...なら可能なのですが…
0467nobodyさん
03/11/07 15:40ID:???それを実行すると1〜3のどれを$aに入れても$bが"three"になっちゃう
各分岐のお尻にbreak;付けましょうね
switch($a) {
case "1" : $b = "one"; break;
case "2" : $b = "two"; break;
case "3" : $b = "three"; break;
}
0468nobodyさん
03/11/07 15:43ID:???よく嫁
http://www.php.net/manual/ja/control-structures.switch.php
0470463
03/11/12 04:51ID:FrBzA+Quありがとうございます。
そういえば、php4からヒアドキュメント使えるようになったんですよね。
(php3の知識はあっても、4の知識はあまりないもんで)
ヒアドキュメントで逝ってみます。
ただ、print qq|ほげー|;の手軽さが、なれてしまって、ラクなんですけどね。。。
ともかく、ありがとうございました。
0471nobodyさん
03/11/12 05:09ID:???0472nobodyさん
03/11/12 06:00ID:???↓このへんわかりやすいんちゃう?
http://itbtech.itboost.co.jp/php/php_01.php
<引用>
PHP の変数は宣言がありません。
また、明示的に型の指定をしてやる必要もありません。
この辺は Perl と同じです。
必要に応じてキャスト(相当のこと)を行うことはできます。
</引用>
0473nobodyさん
03/11/12 17:05ID:???という書き方を多用していたのですが、
PHPでは$a = !isset($a) ? "default a" : $a;
でよろしいのでしょうか?
0474nobodyさん
03/11/12 20:14ID:???なら、
$a || ($a = "default a");
$a or $a = "default a";
とか。
$a |= "default a";
はそのままで通る。
(perl/PHP共に期待したものではないと思うけど)
0475473
03/11/12 21:19ID:???すみません、先ほどは$a ||= "default a";
のことを言っておりました。
で、$a || ($a = "default a");
ですと、$aが未定義の場合、undefined errorが出てしまいます。
(当方error_reporting = ALLにしています)
0476nobodyさん
03/11/12 21:56ID:???isset($a) || ($a = "default a");
これでどう?
厳密にはこうだろうけど、
(isset($a) && $a) || ($a = "default a");
長すぎ。
# PHP的には、先にデフォルトを設定するものだと思ってた。
# PHPのエロイ人plz。
0477473
03/11/12 22:08ID:???これなら問題なく実行できました。この書き方が一番スマートそうですね。
0478nobodyさん
03/11/12 22:08ID:???0479nobodyさん
03/11/12 22:34ID:???php.iniの設定変更
arg_separator.input = ";&"
しか思いつかない。
Perlと関係なければ、
【PHP】質問スレッド Part11
http://pc2.2ch.net/test/read.cgi/php/1067635640/l50
こちらへどぞ。
0480nobodyさん
03/11/26 02:30ID:???別に用は無いんだけど
0483nobodyさん
03/12/12 01:34ID:???0484nobodyさん
03/12/14 00:06ID:???fsockopenの第一引数にIPアドレスを入れれば、
内部的に名前の解決をしなくて済むのでしょうか?
0485nobodyさん
03/12/14 21:20ID:???IP address がすでにわかってるのに名前の解決?
Ip address => name なら、そもそも必要ない。
fsockopen関数の内部で、PHPが名前え解決するかどうかとういう話であれば、
inet_aton が失敗すれば(第一引数のhostが IP address を表す文字列でない場合)、
名前の解決(gethostbyname)がされる様です。
0486nobodyさん
03/12/14 23:41ID:???>fsockopen関数の内部で、PHPが名前え解決するかどうかとういう話であれば、
>inet_aton が失敗すれば(第一引数のhostが IP address を表す文字列でない場合)、
>名前の解決(gethostbyname)がされる様です。
なるほど、ありがとうございます。
大変参考になりました。
0487486
03/12/17 00:08ID:???処理にかかる時間を比べたんですが、
前者の方が多少遅い結果になりました。
perlの場合とはやはり違うのでしょうか…?
0488nobodyさん
03/12/18 13:37ID:SDZbq9mqっていうのはPHPではどう書けば良いでしょうか?(´・ω・`)?モニュ
小一時間探したけど見つかりませんでした
0489nobodyさん
03/12/18 13:59ID:SDZbq9mq検出されたらエラーを表示させる事です。
perlだと
if(($_ =~ tr/a-zA-Z0-9//c) {
die 'リストに含まれない文字が検出されたYO!';
}
な感じでそれをPHPでやりたいです。
0490nobodyさん
03/12/18 15:25ID:???http://pc2.2ch.net/test/read.cgi/php/1070639208/
0491nobodyさん
03/12/18 16:46ID:???どうせろくでもないベンチスクリプトだろ
>488
既出
>789
!
0492nobodyさん
03/12/18 20:33ID:???$str = ...
if (ereg("[^a-zA-Z0-9]", $str)){
die('リストに含まれない文字が検出されたYO!');
}
多分"[^[:alnum:]]"でも。
0493nobodyさん
03/12/18 20:37ID:???0494nobodyさん
03/12/21 18:56ID:16zntf/gぇ?ネタですか?(´・ω・`)?モニュ
-zA-Z0-9にマッチでエラー表示
じゃないでつ。文字列中に例えば
記号が入ってたらエラーにする処理でつ。
0495nobodyさん
03/12/21 20:52ID:???491のでええやん。elseでもいいし。
0497nobodyさん
03/12/22 17:55ID:???0498nobodyさん
03/12/22 19:05ID:???0499nobodyさん
03/12/23 11:09ID:hM9+gLxRぉぉやってみたら確かにマッチした。さんくすこ。
PHPだと’^’って反転する意味なのですか・・・?
なんか小さな幸せを発見したw
0500nobodyさん
03/12/23 11:15ID:hM9+gLxRぁぁぼけてすまそ。。。
文字クラスの反転記号ですね。記憶から全く遠のいていますた。
(PHPの独自拡張なのかとさえ思ってしまったw)
もう一度勉強し直し逝ってきま _| ̄|○
0501nobodyさん
04/01/19 18:13ID:???で、どのへんまでできた?
なぜかおれも作るハメになってしまって、
BNFで定義しきれないPerlを無理やりBNFレベルで定義中なんだけど。
そこまでPerl詳しくねーんで困ってる。
parrotのライブラリにPerl6のパーサーやってるっぽいんだが、、むずい。
だれか、なんちゃってPerl BNF定義した人おらんですか。。
0502501
04/01/19 18:23ID:???コンテンツか。。ツールじゃないのね。。シツレイ
0503nobodyさん
04/01/23 00:02ID:Zt/PsL2Cidはadmin、passは111111だったとして、
test.php?id=admin&pass=111111と入力します。
test.php内で
idとpassの値を受け取るには、$id=param[id]でしたっけ?
0504nobodyさん
04/01/23 00:24ID:Zt/PsL2C$_GET["id"];
$_GET["pass"];
0506nobodyさん
04/01/23 01:03ID:Zt/PsL2Cここ読みました。
http://php.s3.to/off.txt
これも対策済まれている方が多いことですが、
Warning: REG_EBRACK in
eregi関数で文字比較するとき、全角の「ー」の2バイト目が半角では“[”になるのが原因らしい・・
簡単な解決方法ありますでしょうか?
0507俺様
04/01/23 01:17ID:???いや、俺もツール考えてみたんだわ。
PHPなら文法定義しているの発見したんだけど
Perlは見つからないんだよね。。。
perly.yにあるyacc文法も読んだんだけど
文法以前に字句解析どうしようって感じで。
0508nobodyさん
04/01/23 02:04ID:???extract() するなら、$_GETでアクセスする必要ないかと…
register_globals=off がデフォになったのは、
未初期化の変数が汚染されたりとか
セキュリティ面の問題が利便性より重要だったからではないのかなぁ
なので、extract()するならその配列の安全チェックをしてからのほうが良いかと。
0509nobodyさん
04/01/23 02:08ID:???内部エンコーディングをEUCかUnicodeにする。
入力変換をautoにする。
これで、内部では、EUCかUnicodeになるので、その手の問題に遭遇しない。
海外製ソフトでSJISはいいことがない。
0510nobodyさん
04/01/23 02:13ID:???内部エンコードにそろえてやる必要があると思います。
0511nobodyさん
04/01/23 23:10ID:???list()でログファイル(5MB程度)を参照して検索などを作るとき、
fopen()
flock()
Fclose()
しなくてもログファイルの破損などは起こらないでしょうか?
書き込み中はロックしてますが、list()中はロックしないとします。
0513アノニマス
04/02/16 18:58ID:O91ZKuNrどこがおかしいの?
//10桁の1...と12桁の2...の配列がある。
$str = array('1111111111','222222222222');
//10桁以上、10桁以下の(要は10桁のみ)数値パターンを配列$resultに格納したい。
$hoge = preg_grep("/[0-9]{10,10}/",$result);
//結果、両方でてきちゃう。どうして?
print_r($result);
よろしこ。
■ このスレッドは過去ログ倉庫に格納されています