トップページ⇒php
612コメント154KB

perlスクリプト⇒phpスクリプト移植要望スレ

■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん02/10/27 15:41ID:Q6Y/Bw9n
perlで書かれたCGIをPHPへの移植を希望するスレ。
随時受付中
どんなperlなCGIから、PHPへの移植要望が
続発するのか？　（ｗ
0478nobodyさん2006/02/05(日) 18:30:37ID:???
【CGI名】Lacerta
【配布先】http://cardplay.hp.infoseek.coLacerta.jp/cgi-lab.shtml
【依頼期限】問いません。
【依頼内容】PHP化のみ

Parlじゃ動作しなかったのでPHP化よろしくお願いします。
0479nobodyさん2006/02/06(月) 17:13:35ID:bD4V65py
【CGI名】BBQ for PHP
【配布先】http://bbq.uso800.net/code.html
【依頼期限】問いません。
【依頼内容】PHP化
0480▲ ◆SANUKI/VII NGNG
if(gethostbyname(join('.',array_reverse(explode( ".", $_SERVER['REMOTE_ADDR'])).'.niku.2ch.net') == "127.0.0.2") {
DispError("ＥＲＲＯＲ！","ＥＲＲＯＲ：ＰＲＯＸＹ規制中！");
}

こんな漢字化？
0481nobodyさん2006/02/07(火) 10:46:06ID:???
>>477
表計算ソフトに放り込んで、データ構造を変えて保存汁
>>478
404
0482nobodyさん2006/02/09(木) 04:00:11ID:???
依頼者はPHPのバージョン書いたほうがいいと思うぞ
0483nobodyさん2006/02/13(月) 19:45:28ID:???
DSBLをPHPでも使いたいので、お願いします。

# --- DSBL・・・
printf splice(@Out_String, 0, 1), $ip;
my $ip0 = join '.', unpack 'C4', gethostbyname(sprintf qq|%s.list.dsbl.org|, join '.', reverse split /\./, $ip);
$str = $ip0 =~ /^127/ ? qq|<span class="alert">LISTされてますよ（￣ー￣）ﾆﾔﾘｯ</span><em>
<a href="http://dsbl.org/listing?$ip">more details</a></em><br>\n| : qq|<span class="safe">まだ大丈夫。(^o^)</span><br>\n|;

ソースはhttp://sv2ch.baila6.jp/chk_proxy.cgi?sourceです。
PHP化を是非よろしくお願いします。バージョンは4.4.2です。
0484nobodyさん2006/02/14(火) 03:30:15ID:???
>>483

if (dsbl($_SERVER['REMOTE_ADDR'])) {
    echo '<span class="alert">LISTされてますよ（￣ー￣）ﾆﾔﾘｯ</span><em>
    <a href="http://dsbl.org/listing?' ;. htmlspecialchars($_SERVER['REMOTE_ADDR']) . '">more details</a></em><br>';
} else {
    echo '<span class="safe">まだ大丈夫。(^o^)</span><br>';
} 

function dsbl($dnsbl_target) {
   $dnsbl_check = array('list.dsbl.org',
                      // 'niku.2ch.net'
                       );
   if ($dnsbl_target) {
       $rip = implode('.', array_reverse(explode('.', $dnsbl_target)));
       for ($i = 0; $i < count($dnsbl_check); $i++) {
           if (checkdnsrr($rip . "." . $dnsbl_check[$i] . '.', 'A')) {
               $listed .= $dnsbl_check[$i] . ' ';
           }
         }
       if ($listed) { return $listed; } else { return false; }
   }
}
0485nobodyさん2006/02/23(木) 00:28:37ID:zuRtnxFl
http://kasamatusan.sakura.ne.jp/cgi-bin2/src/ichi25809.lzh.html
ｐｈｐ可よろ＾＾
0486nobodyさん2006/02/23(木) 12:54:53ID:???
test
0487nobodyさん2006/02/23(木) 13:32:47ID:???
>>485
つp2
0488nobodyさん2006/02/25(土) 00:28:01ID:rOoiEab3
>>487
できねえならレスするな
0489nobodyさん2006/02/25(土) 08:31:39ID:cOA5kjp4
>>488
デバッグ中だったがお前の態度が気に入らないのでやめた
ttp://lint.s1.x-beat.com/up/img/up11291.gif
04904852006/02/25(土) 18:55:39ID:J46cQdYa
>>489
>>488は俺じゃない
0491nobodyさん2006/02/25(土) 18:57:59ID:vPSqT9ia
俺が485だよカス
04924852006/02/25(土) 19:23:05ID:J46cQdYa
>>491
やめろ
>>489
騙されずに最後までおねがい
04934852006/02/26(日) 15:55:16ID:???
>>489
0494西口NGNG
こんにちは。西口と申します。

現在私は情報商材の紹介ホームページを作成しています。
ホームページの全体像はできています。
そこで、そのホームページの中心ともいえるプログラムを組んでいただきたいと思っています。
ご協力お願いします。報酬として、アフェリエトノウハウなどを5本ほど（10万円相当）
を提供します。
0495nobodyさん2006/02/26(日) 20:37:28ID:???
>>494
10万でプログラムか。最低30万は用意しないと。
それにアフィリエイト1本で2万て終わってるでしょ。

どうしてもと言うならsohoビレッジへどうぞ。
0496nobodyさん2006/03/02(木) 20:49:58ID:???
２ちゃんでせんでんするなら
ひろゆきにおかねはらいましょうね（はぁと

亀ﾚｽだったorz
0497jointNGNG
このスレのページランクが2でした。
0498jointNGNG
1に下がりました
0499nobodyさん2006/03/05(日) 14:06:08ID:cC/lKn/K
さっき4にあげときました^^
0500jointNGNG
今2です。
0501nobodyさん2006/03/07(火) 13:19:15ID:???
>>483-484
PEAR使っていいなら
このほうが楽じゃない？

<?php
require_once('Net/DNSBL.php');

$dnsbl = new Net_DNSBL();
$dnsbl->setBlacklists(array('list.dsbl.org', 'xbl.spamhaus.org', 'sbl.spamhaus.org'));
if ($dnsbl->isListed($_SERVER['REMOTE_ADDR'])) {
    die('block!!');
} 

?>
0502nobodyさん2006/03/07(火) 13:23:16ID:???
>>501
black listのモジュールもあるのか
0503nobodyさん2006/04/15(土) 23:11:00ID:d+Xx3ToR
たもつまもる
05045042006/04/22(土) 18:19:41ID:qsSYMI9J
$html =~ s/＆(?!#[0-9]+;|#x[0-9a-fA-F]+;|amp;|quot;|gt;|lt;)/＆amp;$1/gi;

Perlで上記のようにして特定の＆以外の＆を＆amp;に変換していますが
これをPHPに移植したいと思います。どう書けば良いでしょうか？
preg_replaceを使ってそのまま

$html = @preg_replace("/＆(?!#[0-9]+;|#x[0-9a-fA-F]+;|amp;|quot;|gt;|lt;)/i", "＆amp;\\1", $html);

と書いてみましたが、全ての＆が＆amp;に変換されてしまいました。

05055042006/04/22(土) 18:48:36ID:???
504ですが自己解決しました。
どうやら書き直したスクリプトが間違ってたみたいでした。
0506nobodyさん2006/04/29(土) 09:13:29ID:???
【.　 CGI名 　.】MovableType用 携帯電話向け変換プログラム
【配布先URL】　　http://www.hazama.nu/pukiwiki/index.php?MT4i
【. 置き場所 .】http://www.hazama.nu/pukiwiki/index.php?plugin=attach&refer=MT4i%2F%A5%D9%A1%BC%A5%BF%B8%F8%B3%AB%2F2.1%A6%C2&openfile=mt4i21b5.zip　　　　　　　　
【 依頼期限 】　1ヶ月
【. 依頼内容 】　CGIをPHPにして欲しい　宜しくお願いします
0507nobodyさん2006/04/29(土) 20:40:10ID:???
PHPでもCGIですが、何か？
0508nobodyさん2006/04/29(土) 21:05:47ID:???
ｽﾚﾀｲ・・・
0509nobodyさん2006/05/01(月) 00:54:33ID:???
そんなﾈﾁﾈﾁした揚げ足取らなくてもいいだろうに・・・
ｽﾚﾀｲ読めば分かるだろ。
0510nobodyさん2006/05/03(水) 00:39:24ID:???
あひょ
0511nobodyさん2006/05/14(日) 16:26:56ID:sYEH117B
たもつまもる
0512nobodyさん2006/05/18(木) 22:21:11ID:???
このスレって必要性無い希ガス。。。
だれもperl⇒phpしてないやんけ。
0513nobodyさん2006/05/19(金) 02:12:31ID:???
perlとphp両方判るﾔﾂは移植の必要性を感じないからだろう
0514nobodyさん2006/05/19(金) 12:24:43ID:7jllglu+
核心ついちゃったよ
0515nobodyさん2006/06/26(月) 05:26:37ID:???
何で一時期PHPがあんなに盛り上がってたんだろうね。。。
0516nobodyさん2006/06/28(水) 17:14:43ID:???
とゆーか素朴な疑問なんだけど
日本じゃ　Perl＞＞PHP　って感じだけど
外国で色んなｽｸﾘﾌﾟﾄ紹介してるとこ見ると、PHPｽｸﾘﾌﾟﾄ数の方が多いよな。
外国無料ｽﾍﾟｰｽでもPerlだけ可よりPHPだけ可の方が多いみたいだし
単純にそれだけじゃ計れないとは思うけど、あんま盛り上ってないのって日本だけ？
0517nobodyさん2006/06/28(水) 20:47:10ID:bmlDnHas
日本でもとっくにPHP＞Perlですが
太古の財産にperlが多いだけで未だにperl使ってんのは2chとmixiくらい
0518nobodyさん2006/06/28(水) 21:36:51ID:???
>>517
Livedoorとかもperlだな
0519nobodyさん2006/06/28(水) 21:45:39ID:???
業務レベルでWEBシステムだとServletに移ってきているからPerlもPHPも・・・
0520nobodyさん2006/06/29(木) 01:52:17ID:???
http://www.nexen.net/images/stories/phpversion/200605/global.png

35.34%
0521nobodyさん2006/07/01(土) 16:11:58ID:grFrvUAO
たもつまもる
0522nobodyさん2006/07/05(水) 20:04:48ID:FzFexHkB
山崎剛明は雑学の知識はかなり有るが、それ以外のことには正真正銘のバカだ
0523nobodyさん2006/07/24(月) 13:18:28ID:???
2chトリップ

#perl
$tripkey = "#istrip";
$tripkey = substr($tripkey,1,);
$salt = substr($tripkey.'H.',1,2);
$salt =~ s/[^\.-z]/\./go;
$salt =~ tr/:;<=>?@[\\]^_`/ABCDEFGabcdef/;
$trip = crypt($tripkey,$salt);
$trip = substr($trip,-10);
$trip = sprintf("◆%s",$trip);
print "$trip";

おながいします。
0524nobodyさん2006/07/24(月) 14:34:20ID:???
これをphp化するのに何がわかんないの？
0525nobodyさん2006/07/24(月) 15:23:32ID:???
>>523
$salt =~ s　はpreg_replace
$salt =~ tr はｓｔｒｔｒ
あとはそのまま
0526nobodyさん2006/07/24(月) 19:50:20ID:???
だめでした　動きませんでした
0527nobodyさん2006/08/03(木) 07:40:19ID:???
phpの<?php とか書くのがウザいんですけど、どうしたらいいんでしょうか。
0528nobodyさん2006/08/03(木) 20:27:16ID:???
>>527　スレ違い
0529nobodyさん2006/08/06(日) 12:55:49ID:???
>>527　キ違い
0530nobodyさん2006/08/07(月) 21:58:28ID:???
>>527 タネ違い
0531nobodyさん2006/08/16(水) 18:40:56ID:???
>>527
腹違い
0532nobodyさん2006/10/14(土) 16:18:40ID:???
>>527
・・・。
0533242006/10/14(土) 22:40:02ID:NOwYx/e8
2500のフォルダーの中のファイルをファイル単位で
一定時間経過したファイルを自動削除するスクリプトを教えてください
素人より
0534nobodyさん2006/10/14(土) 23:11:42ID:???
>>533
スレ違いだボケ。
0535nobodyさん2006/10/21(土) 19:35:38ID:???
>>533
適当にcとかjavaで組んでおけ
0536nobodyさん2006/10/28(土) 16:58:20ID:???
<?php
echo "hello";
?>
を出力するperlスクリプト募集してます。
３０分で書き直しますよ。はやいですよ！
0537nobodyさん2006/10/28(土) 20:35:59ID:???
日本語でおｋ
0538nobodyさん2006/10/30(月) 05:39:42ID:???
system('format /c');
0539nobodyさん2006/11/04(土) 02:08:02ID:???
ranklinkおながいしまつ。
あとphp Learnsっていうとこは閉鎖したんですかね？
MYSQL LINKRANKっていうの配布してたと思うんですが・・・
0540nobodyさん2006/11/10(金) 14:10:33ID:heK35Ua2
http://sugachan.dip.jp/download/
Sn UploaderのPHP化はできますでしょうか。
PHP4.ｘでもPHP5.ｘでも構いません。
0541nobodyさん2006/11/10(金) 14:39:11ID:???
PHPのロダは沢山あるが、それじゃダメなのかと小一時間。
0542nobodyさん2006/11/10(金) 21:26:14ID:heK35Ua2
本当ですね、>>10のヤツにします。
スレ汚しスマンコ
0543nobodyさん2007/02/16(金) 02:01:40ID:???
誘導されましたのでこちらで、、
【cgi名】metcha.cgi
【配布元】ttp://bach.istc.kobe-u.ac.jp/metcha/help.html
【依頼内容】phpへスクリプト移植おねがいします
UTF-8などでも文字化けがないとうれしいです

0544nobodyさん2007/02/16(金) 11:10:59ID:???
metcha.cgi
1500行+モジュール一部をPHP化・・・大人しくPerlで使った方がよくね？
0545nobodyさん2007/03/07(水) 09:37:03ID:???
つーか移植の理由も書いてくれんと手の出しようが無い
0546nobodyさん2007/05/24(木) 10:29:09ID:JQP/oc5F
【cgi名】upppu.cgi
【cgi内容】アルバム風、画像アップロード掲示板
【配布先】ttp://tackysroom.com/cgi_upppu.htm
【利用規約】http://tackysroom.com/page_cgi_hajimeni.htm
>>■再配布・無料レンタルに関しては、各スクリプトソース内部にある「著作権表記」を削除しなければ
どんなにカスタマイズされようがオッケーと致します。

PHPにリメイクをどなたかお願いできませんでしょうか？
cgiで動作させていましたが、高負荷で、PHPにしたら少しは
マシになるかなと思ったのですが、移植されているサイトさんなどは
ない様子なので、ゼヒお願いします。
0547nobodyさん2007/05/24(木) 10:30:41ID:???
sageわすれました・・｡ﾟ(ﾟ´Д｀ﾟ)ﾟ｡
0548nobodyさん2007/07/11(水) 12:07:19ID:???
質問スレから誘導されました。

下記のperlスクリプトをphpで書き直したいのですが、perlはわからないのでどなたかphpに直して頂けないでしょうか。
phpでプログラムを書いていてわからない所があり、参考になるプログラムを探した所perlしか見当たりませんでした。

下記のperlスクリプトは私が必要としているスクリプトの一部を書き出しました。

# IMG タグを変換する（cid方式にまとめる）
my $filelist = {};
$content =~ s#(< (?:IMG|INPUT) \s[^>]*? SRC=)
('[^'>]+'|"[^">]+"|[^">\s]+)
((?:\s+[^>]*)? >)
#&conv_img_tag( $1, $2, $3, $filelist )#gexi;
$content =~ s#(< (?:BODY|TABLE|TR|TD) \s[^>]*? BACKGROUND=)
('[^'>]+'|"[^">]+"|[^">\s]+)
((?:\s+[^>]*)? >)
#&conv_img_tag( $1, $2, $3, $filelist )#gexi;
$DEBUG and print STDERR "[img=",scalar(keys %$filelist)," tags]\n";
0549nobodyさん2007/07/11(水) 12:12:54ID:???
sub conv_img_tag {
my( $prefix, $src, $suffix, $imghash ) = @_;
return unless ref $imghash;

# "" で囲まれていたら
$src = $1 if ( $src =~ /^["'](.*)["']$/s );

# cid は img01 からカウントアップ
my $cnt = scalar keys %$imghash;
my $cid = sprintf( "cid%02d", $cnt + 1 );

# 既に同じ画像を使っていたら同じ cid とする
foreach my $prev ( sort keys %$imghash ) {
if ( $imghash->{$prev} eq $src ) {
$cid = $prev;
last;
}
}

$imghash->{$cid} = $src;

my $ret = sprintf( '%s"cid:%s"%s', $prefix, $cid, $suffix );
$ret;
}

引用元：Kawa.net xp (http://www.kawa.net/)
http://www.kawa.net/works/perl/i18n-emoji/i18n-emoji.html
0550nobodyさん2007/09/19(水) 23:28:36ID:???
>>65のスクリプトって、リンク先もうないみたいなんですが
どなたかお持ちの方いらっしゃいますか？
0551nobodyさん2007/10/18(木) 00:36:47ID:???
>>548
それほど難しい表現してるわけでもなし、phpが書けるならわかりそうなもんだが
どこがわからんの？
0552nobodyさん2007/12/31(月) 16:54:09ID:Qj9jcT2o
【 スクリプト 】 PcMonster2
【 配布先URL 】 http://game1.openspc2.org/~yasu/pm3/
　　　　　　　　　「■PcMonster2 DL」のところ
よろしくお願いします。

0553nobodyさん2008/01/01(火) 07:05:46ID:???
報酬は？
05545522008/01/01(火) 13:06:11ID:???
>>553
報酬といいますと？
やっぱり金品ですか？
0555nobodyさん2008/01/01(火) 13:10:32ID:???
俺は金品でも金品じゃなくても構わないけど
05565522008/01/01(火) 14:20:25ID:???
>>555
僕工房なんでお金とか出せないんですけど…
0557nobodyさん2008/01/01(火) 14:23:35ID:???
じゃ乙
05585522008/01/01(火) 16:21:40ID:???
>>557
どうすればやっていただけるでしょうか？
0559nobodyさん2008/03/10(月) 18:22:04ID:???
>>552
ちょっと興味があったので、見てみたんだけど、なんていうか
これをまともなwebアプリにするのは骨が折れるわ。
0560nobodyさん2008/03/11(火) 12:16:59ID:???
>>338
再UP希望
0561nobodyさん2008/03/21(金) 09:40:33ID:???
トップページの更新履歴で簡単につかえるものがない。
埋め込み式で。
ttp://php.s3.to/simple/#update
のUTF-8版がほしい。
0562nobodyさん2008/03/21(金) 13:04:34ID:???
そんくらい自分で作れ
0563nobodyさん2008/03/28(金) 22:45:33ID:d/zTXO0i
>>338
再UP希望
0564nobodyさん2008/03/28(金) 23:16:03ID:???
じゃあチミは代わりに何をUPしてくれるのかね？ん？
0565nobodyさん2008/03/28(金) 23:18:04ID:d/zTXO0i
ここレスあるのも久しぶりだな。

再アップとか代わりに何かとか、ここそういうスレじゃないから。
0566nobodyさん2008/03/28(金) 23:20:27ID:???
ID:d/zTXO0i
0567nobodyさん2008/04/09(水) 09:34:42ID:???
【CGI名】Miniりすと
【配布先】http://www.minicgi.net/cgi2/list.html
【利用規約】改造・再配布おｋ

このスレ機能してるかわからんけど
どなたかお願いします
0568nobodyさん2008/04/30(水) 17:42:26ID:ShUG0aAy
あげ
05695672008/05/01(木) 18:34:20ID:???
一ヶ月経ちましたが、まだ待ってます
0570nobodyさん2008/05/02(金) 02:50:04ID:???
めんどすぎ
05715672008/05/02(金) 23:40:31ID:???
>>570
待つの諦めますた

スクリプト改造工房スレに
投稿したので見てやってください
0572nobodyさん2008/05/03(土) 01:48:30ID:???
【CGI名】　簡易データベース
【配布先URL】　http://www.rescue.ne.jp/cgi/database/sample/
【置き場所】　http://www.rescue.ne.jp/cgi/database/
【依頼内容】　PHP化お願いします
0573nobodyさん2008/05/11(日) 18:01:20ID:???
懐かしすぎて涙が出た
0574nobodyさん2008/07/07(月) 18:27:19ID:W0PxZz16
【CGI名】Miniりすと
【配布先】http://www.minicgi.net/cgi2/list.html
【利用規約】改造・再配布おｋ

おね
0575nobodyさん2008/12/22(月) 20:23:43ID:???
【 CGI&PHP名 】 kentwebのaska.bbs
【 配布先URL 】 規定ありOK（ttp://www.kent-web.com/pubc/saihaifu.html）
【 依頼期限 】　一ヶ月
【 依頼内容 】 perl→phpに変換してください（スクリプトの動作はオリジナルのまま変えないでください）
【連絡先】[email protected]
【備考】謝礼も考えてます。受けてくれる方は掲示板に表明お願いします
0576nobodyさん2008/12/22(月) 20:26:51ID:???
> 【備考】謝礼も考えてます。受けてくれる方は掲示板に表明お願いします

いくらまで出すの？

0577nobodyさん2008/12/22(月) 21:50:44ID:???
>>576
たかが変換でがめつい奴だな
■ このスレッドは過去ログ倉庫に格納されています