【Perl】勉強したい人協力したい人ﾄﾞｿﾞｰ【PHP】

趣味で5年近く(内2年はｇｄｇｄ)Perlを触ってきたが、まだまだやれることが沢山あると気づき再度勉強を始めてみることにしたｽ(・ω・｀)
PHPもﾎﾞﾁﾎﾞﾁ始めてはいるが、Perlの習得率が低いせいで思うように動かせず･･･

そんなｵｲﾗがﾀﾞﾗﾀﾞﾗとソース公開しつつ、勉強していきたいと考えているｽ(・ω・｀)

手始めに2ch内の画像やら動画やらのアドレスを拾ってサムネイル(画像のみ)表示するものを作ってみたｽ
手直しのポイントや新しい機能(アイディア)があれば教えて欲しいｽ


他にも空いた時間で色々やってみたいとか思ってるｽ


2ch IMAGE thumbnail
http://vip.ty.land.to/image/


似たようなスクリプトを他に見かけるのは内緒ｽ(・ω・｀)
ソースとか、勝手に持ってって欲しいｽ

せめて各種言語の関連スレをテンプレとして用意するとかしてからスレ立てろや

ｽﾏﾝｺ(・ω・｀)
他スレに頼ると悪いかなぁと思ってｽ

一応張っとくｽ
△▲ WebProg 初心者の質問 pert14▲△
http://pc8.2ch.net/test/read.cgi/php/1151501830/

【Perl】
ご希望のCGIを作成いたします
http://pc8.2ch.net/test/read.cgi/php/1145308869/
Perlコーディング初心者質問スレ Part 52
http://pc8.2ch.net/test/read.cgi/php/1158296511/
【 スクリプト改造依頼スレ 】(丸投げ) part6
http://pc8.2ch.net/test/read.cgi/php/1157787046/
■こんなCGI作ってください■　Part.2
http://pc8.2ch.net/test/read.cgi/php/1133361560/
【Perl上級者コーナーPart01】
http://pc8.2ch.net/test/read.cgi/php/1024741312/

【PHP】
【PHP】下らねぇ質問はここに書き込みやがれ 30
http://pc8.2ch.net/test/read.cgi/php/1159979905/
くだすれPHP（超初心者用）
http://pc8.2ch.net/test/read.cgi/php/1150088761/
【PHP】自作スクリプト発表会
http://pc8.2ch.net/test/read.cgi/php/1017456911/
【PHP】フレームワークについて語るスレ5【総合】
http://pc8.2ch.net/test/read.cgi/php/1159579507/

【ASP】
【質問】ASP.NETスレ Part3【議論】
http://pc8.2ch.net/test/read.cgi/php/1160355849/

TOPでよく見られているスレッドを表示させたいｽ(・ω・｀)
昼間にいじったら、やたら重かったｽ・・・
ループが多すぎるのか・・・

その時のコード消しちゃったｽから、また書いたらここに記録するｽ(・ω・｀)

評価スレに評価した。

Perlがmodで動いてないならPHP使ったらどうよ。

レス読んだｽ！(；ω；｀)
真にありがたい！！

PHPは現在Perlよりも習得率が低くて、使い物にならないｽよ･･･
頑張って書いてみてもよかったｽが、今回はモジュールを利用して通信とかを楽に行うことがおおよその目的だったｽ(・ω・｀)
PHPでデータベースを扱うと楽というニュアンスだけは、掴んでるｽ
やっぱりPHPにもモジュールが沢山あるんｽかね・・・

>>1のスクリプトに限らず、色々やっていきたいｽ！(・ω・｀)

VIPで質問してたやつか
じゃあVIPやれ

>>7
ソレｵｲﾗじゃないｽよ(・ω・｀)

・== '1'←クォートの必要なし。
・オライリーの"詳説正規表現"を読め。
・もっとmy使って欲しいｽ。
・私的にはexit欲しいｽ。
・Shift_JISじゃなくて流行りのUTF8かEUCで組んで欲しいｽ。
・ヒアドキュメントもっと使って欲しいｽ。
・現状で使う必要あるか分からないけど、時々flockのことも思い出してくださいｽ。
・format関数も調べてみると面白いｽよ。
・print "<div class=\"page_list\" align=\"center\">[新]";
↓せめて
print '<div class="page_list" align="center">[新]';
要はシングルクオートも要所要所で使えｽ。
面白いから頑張れｽ。

持論だけど使い物にならなくても組んでみた方が上達が早い。
まだ俺はニ・三年ぐらいｽ。

>>9
> ・== '1'←クォートの必要なし。
薄々気づいてたｽ(・ω・｀)ｵｰﾏｲｶﾞ

> ・オライリーの"詳説正規表現"を読め。
読んでみるｽ！

> ・もっとmy使って欲しいｽ。
> ・私的にはexit欲しいｽ。
my苦手ｽ･･･
欲しい時に欲しい関数が使えないのは、きっとｵｲﾗのプログラミング技術がヘボなせいｽね・・

> ・Shift_JISじゃなくて流行りのUTF8かEUCで組んで欲しいｽ。
EUCに乗り換えようか考えてるｽ、でもソース表示が･･･(・ω・｀)ｱｳｱｰ

> ・ヒアドキュメントもっと使って欲しいｽ。
何ｽか？ソレ･･･

> ・現状で使う必要あるか分からないけど、時々flockのことも思い出してくださいｽ。
いつも使ってるｽ(・ω・｀)
この先また使うかもｽね

> ・format関数も調べてみると面白いｽよ。
何だろう･･･美味しいｽか？(・ω・｀)
調べてみるｽ

> 要はシングルクオートも要所要所で使えｽ。
変数使わないところ限定ｽね

> 面白いから頑張れｽ。
thankｽ！
ｇｄｇｄ頑張っていくｽ(・ω・｀)

>>10

使って慣れろ！という話しでｽな(・ω・｀)ﾅﾙﾎﾄﾞ
知らないものを使うのは結構勇気がいるｽが、今回のモジュールしかりで使ってみるととても便利なものがいっぱい見つかって楽しｽ
最近(2日程前)ようやくindex()の使い方が解ったｽ･･･
便利すね、正規表現より早い感じでよかったｽ

この調子で色々盛り込んで、ナイｽなスクリプトが組めるようになっていいたいｽ(・ω・｀)


目指せ商用レベル！ｽ(・ω・｀)

http://vip.ty.land.to/image/
これ>>1のサイトじゃないの？
VIPでdatから画像のurl抜き出したいから教えてくれスレたってたんだが

同じ質問をperlの初心者スレでもしてスルーされてたけど

VIP帰るか顔文字使ってしゃべるのやめれ

>>13
ソレｵｲﾗじゃないｽ
その人のスレでよく宣伝がてら、一緒にｇｄｇｄ考えてたｽからその人と間違ってないｽか？

>同じ質問をperlの初心者スレでもしてスルーされてたけど
ｵｲﾗしてないｽ


顔文字了解･･･少しさみしｽ・・

http://vip.ty.land.to/image/
これはｵｲﾗ作ｽ

今日のところは時間もきついので、一旦就寝しまｽ


また翌日によろしくｽ

語尾のｽがうぜぇ

>>16
「画像が多過ぎる為一括表示には適していません」と表示されるページでも、n_view=all付けると一括表示できるねぇ
ぃゃ、まぁちょいと気になっただけで使われても（表示がやたら遅い）以外に問題がないなら構わんけど

既存のスレを利用しろよ。
２ちゃんねるにおまえだけのためのオナニースレを作るんじゃねーぞ。
削除依頼を出して来い！

>>17
ｽまんこ

>>18
画像を全部取りに行ってしまうので、多分かなりの負荷ががが
直そうかな

>>19
ﾍﾀﾚで見つけられませんでした、誘導お願いしまんこ

>>18

#今ココとページへの直接リンク
の下の
　$kazu = $cnt%$n_view ? int($cnt/$n_view)+1:int($cnt/$n_view);
の下に
　#表示件数が多すぎる場合の規制
　if($FORM{'n_view'} eq 'all' && $kazu > 5){
　　$n_view = 12;
　　$kazu = $cnt%$n_view ? int($cnt/$n_view)+1:int($cnt/$n_view);
　}
を追加してみたけど、動作変わらず･･･
何でかねぇ・・
もうちょいﾄﾗｲ

>>1
毎度色々考えるｽね(・ω・｀)

ｵｲﾗのも
http://vip.ty.land.to/image/
似たようなもの開発中

参照スレ
http://pc8.2ch.net/test/read.cgi/php/1160569533/

誤爆してしまった・・・

誤爆元？
http://ex16.2ch.net/test/read.cgi/news4vip/1160632528/

ここの>>1がVIPで宣伝してるのでVIPからキマスタ

>>1
他人のアイデアパクリやんけｗｗｗｗｗｗｗ

>>25
調べたらまったく同じことしてるサイトがあるのなｗ
やられたｽ
しかもｵｲﾗのスクリプトより高機能！
すごいねぇデータベースとかも使って、自動巡回とかもさせてさ。
ｵｲﾗも自動巡回の機能とか組み込みたい･･･

Fedora5鯖立てようとしたけど、結局失敗したし・・・
HTMLは表示されるけど、CGIが表示されないというなぞ

まだまだ勉強が足りんようです

>>26
URLおせーて

まったく同じことしてるｵｲﾗのスクリプトよりもはるかに高性能なサイト？

なら、
ttp://www.abars.biz/search/
ここ

>>28

>>1のサイトとどこが違うの？

>>29
・自動巡回
・対応板数
・評価機能
・サムネイルの画像修正
・データベース管理

かなり素敵な機能が盛り込まれているｽ
データベースいいね！！
自動巡回最高じゃん！！！

ｽってうぜぇ
削除依頼だしとけ

>>1
さっさと削除依頼だしてこい！

もう少し見守ってほｽ

>>33
クソスレたてんなっ
類似スレあるだろうが

>>1
シネ

ム板だとこの手のスレは割りと寛容だけど、ここでは厳しいんだな。

>>36=>>1
自演乙

>>1
アフィ厨乙！

>>34
誘導お願いしまんこ

>>38？
よくみれ、無料のレンタル鯖

>>39
どうせアフィつける予定なんだろ？シネ！

>>40
あふぃ付ける予定ならソース公開なんてしませんが？
これから覚えたい人とかも参考にできるように、と思って公開してるわけですが？

>>41
言い訳かっこわるっ。そうやって信者集めに必死なんﾃﾞﾂﾈ・・・・・

おいっｵﾏｲﾗ！>>1ｱﾌｨ厨に気をつけろっ

ﾊｲﾊｲお疲れさん。

無料鯖のｱﾌｨかも見抜けないなんて・・・

削除依頼だしてVIPでやれよ
おまえのオナニー用にスレたててんじゃねーよ

>>44

池沼の>>1に何行っても無駄だと思うけど

皆さ〜ん>>1がｱﾌｨで儲けようとしていますよ〜
気をつけて〜〜




さて、ｵﾗｲﾘｰどこにしまったかな

乱立スレいくない

試しに設置してみました。
すごいです。

ただ、そのままだと500エラーが出たので

sub page_list{

の直前に

print "Content-type: text/html\n\nOK.\n"; exit(1);

を入れて以下を無効にしたら何とか動いてるみたいです。


あっちこっち閲覧してみたのですが
拡張子だけではなく

http://imepita.jp/
http://pita.st
http://pic.to
http://new.cx

や
htmlにjpgを埋め込む所とかも取得出来たらいいなとか思ったです。
取得出来なくても、URL抽出とか。

>>48
美修正ｻﾝｸｺ

ｲﾒﾋﾟﾀとかは呼んで欲しいアドレスから、実際に画像のあるアドレスへ飛ばすみたいなことしてなかったっけ？
変な日本語ですまそ

もしワンクッションあるなら、その分もスクリプトにがんばって貰わなきゃならないからさらに処理が遅くなるという・・・



とりあえず久々の更新
イメージ表示中にIMGタグのALT属性を使って、イメージのアドレスが貼られたレス内容をまるっと表示しはじめました。
実況アドレスは、TEXTAREAのボックスを使って表示
ちょっと見づらいかもしれませんが、何とか欲しい情報をｺｿｺｿと取れるようになったとか思ったり・・
この作業で色々と変数が追加されたり、扱われ方が変わった変数(@get_img_addr_ori)があったりします。
読む方は注意されたし！

>>49
お疲れ様です。

そういえば たまたま同じサーバですが
こういうのもあります↓

http://findpic.oh.land.to/

>>50
ソレに刺激されて作ったんですｗ

>>1のはキャッシュとサムネイル化の機能を持ってるので、使い勝手というより用途が若干違う感じです。
実況アドレスを探すのは同じようなものですが、デザイン面で差が出たらなあとか思ってます。

あと、ソースを公開することでこれから学ぼうとする方や何かの参考にしたい方とかに提供したいってのもあります。
オープンソースでいいよね、って。



イメピタとかのアドレスへの対応も、少し考えてます。
実現に何が必要かとかとか・・・

・制限時間外に画像を取得する。

>>52
PC制限ありましたな。
ユーザーエージェント偽装するだけじゃ、意味ないかなー･･･

アドレスで判別してるから意味無い。

ただいま糞詰まっております。
どーしてもPerlで特定のポートにPINGを遅れない！

mms://111.222.333.444:5555
こういうアドレスにpingを飛ばして生存チェックをしたいわけですが、
5555番ポートにpingを送る手段が調べても出てこない・・・・
唯一近いと思ったのがNET::Ping、でもコレはポート指定出来ないくさいかんじ。
で、考えたのが画像を取得しに行くのと同じようにアドレスに対してアクセスしてみる方法
繋がっていても繋がっていなくても、応答コード501
その上コンテンツタイプはtext
なにこれ・・・orz

部分的にソースを抜き出してplとしてローカルで稼動させると503とか返ってきたりする。
さらに、手間を承知でソケットの生成から書いてみたら、200正常に繋がったりする。
（繋がってしまう問いデータをどんどん送られるから困る）
正常に繋がらない場合は、ヘッダのX-Serverってとこに「kagami/0.7.6」とか入ってる。
恐らく繋がってはいるので応答としてkagamiTOOLが503を返してきたものと推測。
しかし、ローカルで確認できるこの作業は鯖にあげると機能しなくなるという罠

land.toさんはソケットつくっちゃいかんのかな・・・
あぁ・・・行き詰まり・・・orz

どうでもいけど、land.to規約違反だな

ｍｊｄｓｋ！

>・他者の著作物を当該著作者の許可なく使用転用すること。
これかぁ・・・

>>56
kwsk

>>55
とりあえず、pingはICMPパケットでTCPじゃない。

PHPを勉強し始めたんですが、クラスって覚える必要ありますか？

勉強する必要がある。
ただし、勉強し始めなら隅に置いて後回しにしても問題ない。

>>61
レスありがとうございます。
そうですか、イマイチ分からなかったので、もう少し後になってから勉強することにします。

>>1はソース作り変えないの？
あれじゃ鯖に負担かかりすぎるでしょ。

PHPやってる人
エディタ何使ってる？

>>64
http://pc8.2ch.net/test/read.cgi/php/1133785416/l50

>>63
どのへんをどういじると負荷軽減に繋がるのかアドバイスが欲しいのですが、
ループ減らすとか･･･、そのへん？

てか>>1は言われたことやったの？

http://www.matubusi.com/cart/cgi-bin/kaitori.cgi?id=5
ここの買取口数とメールフォームの口数を買い取り口数にマイナスする計算の連動
似たようなスクリプトありませんか?もしくは作れますか?
よろしくお願いいたします

>>67
ソースの作り変え･･･、まままままってくれ！
おいらにはそこまでの腕はない！！

どういう風に書くと負担が減るのか、今回のソースは負担とか無視して作ってるような希ガス
特に無駄とも思われるループの数は異常では？
専ﾌﾞﾗで意味のなくなるスクリプトだしｗ

とりあえず、思い立ったかのようにｲﾒﾋﾟﾀたの画像に対応しますた。
「trial」ってディレクトリを参照してます。
トライアルってお試しだよね？
正規登録とかするとディレクトリ名かわるってことかいな･･･、だとしたらどこに保存してあるのか判断しなきゃだね。
こりゃ参った。



>>68
CGI/Perl改造依頼とか作成依頼に頼んだほうがよくね？
ここは勉強が中心なので、「作ってください」だと誰も作らないと思われ。
>作れますか？
可能か不可能化だけを考えたら、現実存在しているんだから可能じゃね？



では、またボチボチがんばります。
warningだったかつけるとエラー吐きまくっておいらのソースじゃ動きませんｗｗｗｗ

イメぴた表示されない

もう表示されるんじゃまいか？

昨日見たときは確かに表示されてなかったけど、正規表現の\d+を{8}とかにして個数指定の形で一致させたら表示出来たのでおｋ
何か日本語がかなりおかしいけど、頭まわってないので勘弁してください。

すみません、入力された整数をパーセンテージとして、
それを歩合に変換したいのですが、どのように書けばよいでしょうか

50　と入力すると　五割
65　と入力すると　六割五分

等です。
ググってもそれっぽいのが出てきません。。。

$percent = 65;
$wari = int($percent / 10);
$bu = ($percent % 10);

こんな感じじゃないｽか？
後は応用とかしてください。


splitとどっちが早いかな・・・？
文字列として扱うより、数値のまま扱った方がいいのかも。


$parcent =~ s/([\d])([\d])(\d)$/$1割$2分$3厘/;
とか厳しそうな手もあったり無かったり･･･、後はｴﾛい人が降臨した時に聞いてみてください。
おいらじゃこれが限界ｽ

>>73
ありがとうございます！
今夜はもう時間がないので明日試してみます、本当にすみません。

サーバに.plファイルを転送したら

ファイルパーミッション 「705」または「755」
ディレクトリパーミッション 「705」または「755」
にして下さい、ということなのですが

どういうことですか？

つ　アクセス権

再開してくださいです。

とりあえず、キャッシュ機能を働かせたいのですがエラーになっちゃいます。

なんで　つД｀)

>>77
キャッシュ無しだと動くのかいね？
「cache」ってディレクトリ作ってある？
自動で作らないしチェックも出来ないもんで、ごめん。

>>78
作ってませんでした･･･。
おかげさまでキャッシュ機能が働くようになりましたです。

Perlに関する試験を受けてみたいんですけど、何か良い資格試験
あったら教えて下さい☆

>>80
マルチ乙

ニュース取得スクリプトみたいに素敵にしたい今日この頃
やっぱデータベース扱えるようにならんとだめかね

>>1
無くなってるのか
結構使ってたので残念

>>82
ttp://vip2.if.land.to/
取り直した。

でも何で凍結されたのかわからん。
容量オーバーかな？

>>84
ttp://vip.wassyoi.info/image/
ごめ、なんか駄目だ。
ソケット使えなくなったとかかもしらん。
エラーが出て動かんので、別口で開発中のアドレスに置いた。


ちなみに開発中なスクリプトは、祭りソナーというかなんというか、検知プログラム。
自動通信、自動更新、データベース管理、メール発射、とか考えてる。
時間無くて一行もかけてないけど、ノートとかにまとめてるからしばしまたれよ。
偉そうなこと書いてｽﾏｿ

教えてください。
超初心者です。

このページ↓のスクリプトを実行すると「暗号化するファイルが開けません」とエラーが出ます。
http://itpro.nikkeibp.co.jp/article/COLUMN/20060131/228211/


その場合考えられることは何でしょうか?

PCはWindowsXP SP2で、c:\phpにphp-5.3.1-nts-Win32-VC9-x86.msiをインストールしています。

WindowsXP SP3でした。

最初の行のファイルが用意されてない

pecl落ちてる希ｶﾞｽ
http://pecl.php.net/

ERROR:
DB Error: connect failed

だとさ

>>1のリンク先が見れない