CGIに依存しないPerlの話題一般/Part2

1 名前：nobodyさん [02/08/29 00:30 ID:IO82UwTT] そんなスレ 2 名前：nobodyさん mailto:sage [02/08/29 00:33 ID:???] パールのパ： パールだねぇ パールのル： ルビーじゃないよねぇ 3 名前：nobodyさん mailto:sage [02/08/29 11:52 ID:???] 糞スレ。 4 名前：age mailto:age [02/08/29 13:26 ID:???] コギャル動画像が無料で より下なのはかわいそうなので age 5 名前：nobodyさん mailto:sage [02/08/29 13:33 ID:???] なんとやる気のない続スレだ。 6 名前：_ mailto:sage [02/08/29 13:36 ID:???] 前スレつかいきってないバチだ！ 7 名前：1 mailto:sage [02/08/29 15:46 ID:???] 前スレがどう終わったのか知らんのだが、、 8 名前：_ mailto:sage [02/08/29 15:52 ID:???] >>7 あるじゃん！ 9 名前：nobodyさん mailto:sage [02/08/29 16:01 ID:???] なぜ前スレはいきなりdate逝きになったのだろう？？？ 10 名前：nobodyさん mailto:sage [02/08/29 16:02 ID:???] >>8 ２ちゃんねる Viewer 落としてまで見れって？ 11 名前：nobodyさん mailto:sage [02/08/29 16:07 ID:???] >>9>>10 普通に見れるじゃん。あげるゾ！ 12 名前：nobodyさん mailto:sage [02/08/29 16:22 ID:???] >>11 age てないじゃん。キャッシュじゃないの？ てゆうか、あげるならネタ提供すれ。 13 名前： ◆JAPH9PWA mailto:sage [02/08/29 16:39 ID:???] >前スレ スレッド一覧にはあるように見えるのが謎。なんでだろう？ 14 名前：適当にリンク [02/08/29 22:08 ID:r+6zee8Z] Swig: www.swig.org/ XS日本語マニュアル: www.kt.rim.or.jp/~kbk/perl5.005/perlxs.html 【P6】 Perl6: dev.perl.org/perl6/ Exegesis 2の日本語訳: bulknews.net/lib/doc-ja/exegesis2.ja.html JavaVM -> ParrotVM: archive.develooper.com/perl6-internals@perl.org/msg03864.html 　　　　　　　　　　　　　 :　www.astray.com/　　　　　　　　　　　　　　　 Perl6　RFC:　dev.perl.org/rfc/ 15 名前：山崎渉 mailto:（＾＾） [02/08/29 22:45 ID:???] （＾＾） 16 名前：nobodyさん mailto:saおおおお [02/08/30 23:01 ID:???] ネタ不意ｒ 17 名前：nobodyさん [02/08/31 01:04 ID:hVzdlXTj] ここに、Perlで英単語の音節数を数えようとしたことある ﾔｼいないですか？ 18 名前：nobodyさん mailto:sage [02/08/31 01:17 ID:???] >>17 あっ、ひょっとして・・・暗号解析？ 19 名前：サンプル盛り沢山 [02/08/31 20:19 ID:AF4irkr1] オカズにするなら、有料より『無料』！！ そんな貴方のために、できました⇒無料サイト♪ 近親相姦・SM・人妻あります！！ www.traffimagic.com/WIPE7MMLZCA/comein/JPMVS 20 名前：名無しさん＠Ｅｍａｃｓ mailto:age [02/09/02 10:39 ID:???] ファイルディスクリプタは my でローカル変数にできますか？ 21 名前：nobodyさん mailto:sage [02/09/02 10:43 ID:???] my と localの違いと関連する言葉をもう一度勉強しなおしてください。 22 名前：名無しさん＠Ｅｍａｃｓ mailto:age [02/09/02 10:49 ID:???] Perlはファイルハンドルって言うんだっけ？ 23 名前： ◆JAPH9PWA mailto:sage [02/09/02 12:44 ID:???] ファイルディスクリプタ単なる整数だよ？ myと何の関係が…とかﾎﾞｹていいですか。 24 名前：21 mailto:sage [02/09/02 15:20 ID:???] うーん、 ソモソモPerlのスクリプトからファイルディスクリプタにアクセスする手段なんて 標準では用意されてない故、質問自体が謎って問題が有るのだが。 # 内部API経由で取れたと思ったけど Cで言うところのauto変数的なイメージなら別にmyで良いし、 一時的にスタックに退避させて(Perlではこーいう表現しないけど) 別のファイルハンドルを保持したいって話ならlocalで良いし。 で、一番つまんないオチが open HANDLENAME, $path_to_file; とかで作ったファイルハンドルHANDLENAMEをスカラ変数に格納したいってのかしら。 my $handle = \*HANDLENAME; なり、IO::Fileなりで好きにして。 25 名前： ◆JAPH9PWA mailto:sage [02/09/02 16:53 ID:???] いや、Perlでファイルディスクリプタを得ることは出来るし、 open()関数でCのfdopen()相当のことも出来るよ。 $fd = fileno(STDIN); open STDIN2, "<&=$fd"; 26 名前：24 mailto:sage [02/09/02 18:03 ID:???] ぎゃふん。 なるほどfileno()ですか。 % perldoc -f open If you specify "'<&=N'", where "N" is a number, then Perl will do an equivalent of C's "fdopen" of that file descriptor; this is more parsimonious of file descriptors. For example: open(FILEHANDLE, "<&=$fd") でも Note that this feature depends on the fdopen() C library function. On many UNIX systems, fdopen() is known to fail when file descriptors exceed a certain value, typically 255. If you need more file descriptors than that, consider rebuilding Perl to use the "sfio" library. ってビミョーですな。 27 名前： ◆4XfSMGTg mailto:っっっっｐ [02/09/02 23:01 ID:???] ナンでも聞け 28 名前：nobodyさん [02/09/02 23:14 ID:yvAB49v2] >>27 perl5.9って出るんですか？ 29 名前： ◆JAPH9PWA mailto:sage [02/09/02 23:20 ID:???] >>26 微妙だけど…大して問題ない気もする そもそもfdを直接使わなければならない状況なんてまれだしね >>28 5.xの将来は分からないけど、5.9がリリースされることは無いと思われ 30 名前：_gunzip ◆H/XdoCNg mailto:sage [02/09/02 23:38 ID:???] >>28 7/18に5.8がリリースされたことを受けて、 Perl5.9の開発は7/25にスタートしている。 31 名前： ◆4XfSMGTg mailto:sage [02/09/03 01:31 ID:???] >>29-30 一人前にトリップなんかつけくさって(w 自意識過剰なんだよ　ばーか 32 名前： ◆JAPH9PWA mailto:sage [02/09/03 09:16 ID:???] >>30 あ、そうなんだ。 …でも5.9って開発バージョンじゃないの？ 更にその次のバージョンっていくつなんでしょ。 33 名前：nobodyさん mailto:sage [02/09/03 09:34 ID:???] >>32 5.10に決まってるじゃん。 34 名前： ◆4XfSMGTg mailto:sag [02/09/03 17:33 ID:???] 開発バージョンだと何か問題でも？ うんこあああああああああ 35 名前： ◆4XfSMGTg mailto:sag [02/09/03 17:36 ID:???] >>30-32 まとめて氏ね 36 名前： ◆4XfSMGTg mailto:sag [02/09/03 17:37 ID:???] 悔しかったら俺みたいに開発バージョンのPerl6をハックできるんだぞ。 37 名前：nobodyさん mailto:sage [02/09/03 17:47 ID:???] >>36 日本語おかしいよ。 38 名前： ◆4XfSMGTg mailto:sage [02/09/03 18:27 ID:???] (´ー`)y-~~ 39 名前： ◆4XfSMGTg mailto:sage [02/09/03 18:43 ID:???] ヽ(´∀｀)ﾉ 　 （　へ） 　　　ヽ 40 名前： ◆4XfSMGTg mailto:sage [02/09/03 23:19 ID:???] >>36 （　´,_ゝ`） ﾌﾟｯ　ちっぽけですね 41 名前： ◆4XfSMGTg mailto:dfsssss [02/09/03 23:21 ID:???] 内部APIでもナンでも答えてくれ！！！ 42 名前： ◆4XfSMGTg mailto:dfsssss [02/09/03 23:22 ID:???] 上級者向けに相応しい質問を募集中 43 名前：nobodyさん mailto:sage [02/09/04 10:03 ID:???] ＞悔しかったら俺みたいに開発バージョンのPerl6をハックできるんだぞ。 悔しいのか。 そうか、がんばれよ。 44 名前：名無しさん＠Ｍｅａｄｏｗ [02/09/04 10:22 ID:zyxWHEDD] jperlも[^２バイト文字]の場合、1バイト単位で処理するんですね。 sjisでは、全角記号は、ほとんど（全部？）\x81から始まっているので、 /[^※]+/とすると全角記号が入っている場合は合致しないんです。 この理解で合っていますか。 45 名前： ◆4XfSMGTg mailto:dfsssss [02/09/04 17:48 ID:???] 上級者の俺がナンでも子ｔらえる 46 名前： ◆4XfSMGTg mailto:dfsssss [02/09/04 17:54 ID:???] ナンでも聞いてくれ。 47 名前：nobodyさん mailto:sage [02/09/04 18:03 ID:???] 偉そうに「聞いてくれ」ていうんだから、44に答えてやれよ。 41では「答えてくれ」って言ってるし、ナンの上級者かわかったもんじゃねぇな 48 名前： ◆4XfSMGTg mailto:dfsssss [02/09/04 18:41 ID:???] 上級者に相応しい質問しか答えないからな！ 49 名前：nobodyさん mailto: [02/09/04 20:07 ID:???] ある人がPerlについて分からないことがあったのでLarryにメールを送って聞いてみたらしいのですが、それについてどう思いますか？ 50 名前：名無しさん＠Ｍｅａｄｏｗ [02/09/04 21:59 ID:rtiaBVOu] Perl Foundationに寄付をたくさん払ったなら許せる。 "私たちはLarryを気を散らすことなくPerl6に集中させることが できることを喜んでいます"と、Perl Foundationの理事長であ り創設者でもあるKevin Lenzoは語りました。" （member.nifty.ne.jp/hippo2000/perlfound.htm） それで、Ｌａｒｒｙから返事は来たの？ 51 名前：nobodyさん mailto:sage [02/09/04 22:00 ID:???] >>49 ある人って誰？ Larryの兄弟とか？ 52 名前：nobodyさん mailto:sage [02/09/04 22:32 ID:???] >>51 ◆4XfSMGTgだろ 53 名前： ◆4XfSMGTg mailto:sage [02/09/04 22:46 ID:???] >>52 ぼくにはそんな根性ないよ 54 名前：名無しさん＠Ｍｅａｄｏｗ mailto:sage [02/09/04 23:11 ID:???] 日本語化パッチ作った斉藤さんとか渡辺さんだったら許せる。 55 名前： ◆4XfSMGTg mailto:dfsssss [02/09/05 00:05 ID:???] XSやParrotの話題を募集中 56 名前： ◆4XfSMGTg mailto:sage [02/09/05 13:00 ID:???] おいおい、誰にも相手にされない寂しいﾔｼがいるぞ 57 名前： ◆4XfSMGTg mailto:s [02/09/05 16:10 ID:???] XSで俺を越えてみろ！ 58 名前： ◆4XfSMGTg mailto:s [02/09/05 18:59 ID:???] 何か言えよ(w 59 名前： ◆4XfSMGTg mailto:sage [02/09/05 19:30 ID:???] 「CGIに依存しないPerl」ってどういうこと？ 60 名前：nobodyさん mailto:sage [02/09/05 20:43 ID:???] >>59 簡単にいえばプログラム技術板向けの板違いスレってこと。 61 名前： ◆4XfSMGTg mailto:sage [02/09/05 20:50 ID:???] >>60 削除依頼よろしく 62 名前：nobodyさん mailto:sage [02/09/05 22:33 ID:???] 前スレが立った時は、プログラム板のPerlスレが軒並み荒らされてたから、 それなりに存在意義はあった。 こんな糞レスが続くようなら削除が一番じゃないのかね。 63 名前：nobodyさん mailto:sa [02/09/06 01:41 ID:???] Perlに関してはWebProgでやってくれ。隔離板だからな。二度お出手くるん 64 名前：nobodyさん <sage> mailto:sage [02/09/06 03:35 ID:???] ◆4XfSMGTgのだけ削除してほしい。 65 名前：nobodyさん mailto:age [02/09/07 08:17 ID:???] 何か面白い話題はないかね。 66 名前：nobodyさん mailto:sage [02/09/07 11:30 ID:???] ねぇよ禿 67 名前：nobodyさん mailto:age [02/09/07 11:53 ID:???] （　´,_ゝ`） ﾌﾟｯ　みなさんレベルが低いですね 68 名前：nobodyさん mailto:sage [02/09/07 12:07 ID:???] 知能程度の低い馬鹿どもが集うスレ 69 名前：nobodyさん mailto:sage [02/09/07 12:14 ID:???] ---------------------------------------------------------------- 　　　　　　　　　　　　　　終了 ---------------------------------------------------------------- 70 名前：nobodyさん mailto:sage [02/09/07 14:08 ID:???] pc.2ch.net/test/read.cgi/php/1029945604/l50 71 名前： ◆4XfSMGTg mailto:sa [02/09/08 13:09 ID:???] XSでもParrotでも内部APIでもなんでも聞け。 72 名前： ◆6Qblom3o [02/09/08 13:24 ID:QfFb5Sab] お 73 名前：nobodyさん [02/09/08 13:52 ID:wrL6AZHT] 　（　・∀・ ）ﾆﾔﾆﾔ　 #kusokote=◆4XfSMGTg=基地外 74 名前：nobodyさん mailto:sage [02/09/08 14:08 ID:???] せっかく「なんでも聞け」と言っているのだから聞いてやれ(w 75 名前：nobodyさん mailto:sage [02/09/08 16:46 ID:???] >>74 コイツは使えないから無視しよう 76 名前：nobodyさん mailto:age [02/09/10 23:22 ID:???] parrotのわだいぼしうちう 77 名前：nobodyさん mailto:sage [02/09/13 01:43 ID:???] #!/usr/local/bin/perl open yourheart, and listen to me, quietly; wait, and teach or tell me truth; 78 名前： ◆A3ItxPxI mailto:ty [02/09/14 14:50 ID:???] age 79 名前：nobodyさん mailto:９お [02/09/18 21:19 ID:???] ｒｔひゅい８ｋ：っっっっっっっっｐ 80 名前：nobodyさん <sage> mailto:sage [02/09/19 05:13 ID:???] ↑ な、なんだっつんだこの野郎！ 81 名前：nobodyさん <sage> [02/09/21 09:14 ID:LEnoYFAX] このスレはRubyキティにずいぶん荒らされちゃったね。 他のPerlスレは、防御が堅かったからあいつ退散したよ。 82 名前： ◆AOHU.zVE mailto:sage [02/09/21 23:05 ID:???] なんで、Rubyの人ってPerlの事きらいなんでしょう？ 83 名前： ◆JAPH9PWA mailto:sage [02/09/21 23:27 ID:???] RubyistがPerlerを嫌いというよりも、Perlが嫌いな者がRuby厨を騙ってるんだと思いますけどね。 84 名前：nobodyさん <sage> mailto:sage [02/09/21 23:37 ID:???] 今日は、プログラム板のPerl質問箱がさんざん荒らされてる。 こいう奴、抹殺できないもんかね。 85 名前： ◆4XfSMGTg mailto:age [02/09/23 20:20 ID:???] なあ、XSでもPerl6でも何でも聞いてくれ。誰か答えると思うし。 86 名前：nobodyさん mailto:sage [02/09/24 08:36 ID:???] >>85 まぁまず"実用Perlプログラミング"か perlxs.podでも読め。 87 名前：nobodyさん mailto:sage [02/09/24 10:17 ID:???] >>85 perl -e"print hex(1E0)";" の結果が1になるのをどうにかしてくれ。 88 名前： ◆JAPH9PWA mailto:sage [02/09/24 10:49 ID:???] perl -e "print hex('1E0')" でいいじゃん。何が不満なの？ 89 名前：nobodyさん mailto:sage [02/09/24 19:37 ID:???] >>87 1e0 は 1 で間違ってない。 1e2 は 100 だろ？10進で。 90 名前：nobodyさん mailto:age [02/09/26 13:24 ID:???] あげてすまない このスレのPart1は何処に行ったか探してるんだが DATが見つからないんだ 誰か知らないだろうか 91 名前：nobodyさん mailto:sage [02/09/26 13:46 ID:???] 糞固定が自己満足で立てた糞スレだから、見る価値のあるレスなんてありません。 早く死ねよ禿 92 名前：nobodyさん [02/09/26 14:15 ID:ICBvAdkm] （ ´,_ゝ`） 　ナンデスカコノ ｱﾌｫは 93 名前：nobodyさん <sage> mailto:sage [02/09/26 14:16 ID:???] Perlをののしり、Perlスレの進行を妨害している粘着基地外のRubyユーザがいます。騙されたり煽られたりした人がたくさん出ています。マジレスしないようにしよう。 94 名前：nobodyさん mailto:sage [02/09/26 21:37 ID:???] >>90 991313362 でつ 95 名前：hmk [02/09/27 01:15 ID:QE9TB9SP] Perlって意識して組まないと ソースが読みにくくなると感 じておられる方いませんか？ 96 名前：nobodyさん [02/09/27 02:32 ID:Fq/U/Ej0] >>95 無論。www.samag.com/documents/s=1336/sam04030017/ とか見れ。 97 名前：hmk mailto:sage [02/09/27 02:45 ID:???] >>96 プププ。ここまで来ると、読みにくいというか、読めまそん。 98 名前：nobodyさん mailto:sage [02/09/27 22:15 ID:???] >>94 ありが�d スレ一覧に無いから削除かと思った 2ちゃんねるViewer、折角だから買ってみたけど････ ちょっと使いにくいな(・∀・；) 99 名前：nobodyさん mailto:sage [02/09/29 03:32 ID:???] >>93 存在を信じて無かった、と言うか冗談だと思ってた が、ム板のkoreスレで散々思い知ったよ あそこには何か病的なPERL嫌いが居る事を 100 名前：nobodyさん mailto:ｓｆｄさ [02/09/29 16:36 ID:???] っっっっっっっっっっｐ 101 名前：nobodyさん <sage> [02/09/30 08:07 ID:AylCxZca] またruby基地外の荒らしだ。 いいかげんにしないとrubyスレが危ないぞ！ 二度と来るな。 102 名前：nobodyさん mailto:sage [02/09/30 12:38 ID:???] Perlってさァ、よくRuby厨にいじめられるけど、実際のところ 処理速度を比べるとどうなの？ Rubyやったことないし、今後やることもないだろうし 103 名前：nobodyさん mailto:sage [02/09/30 13:35 ID:???] どんな言語でも書き手次第だろ。 104 名前：102 mailto:sage [02/09/30 13:49 ID:???] >>103 書き手に依存しない、同じような処理をする関数ごとの処理速度を聞きたい 105 名前：名無しさん＠１周年 mailto:sage [02/09/30 16:22 ID:???] >>104ちゃんへ プログラム板の最強言語決定戦だか、最速言語は何かだかに 出てたよ。アメリカのサイトでいろんな計測してたが、Perl のがどっちかっていうと早いね。 106 名前：名無しさん＠１周年 [02/09/30 16:59 ID:DO2Y0sBw] >>103 じゃ、書いとく。 blade.nagaokaut.ac.jp/cgi-bin/scat.rb/ruby/ruby-talk/43294 にまとめて書いてある。リンク先辿れば、具体的なテスト結果が見れる。 107 名前：106 mailto:sage [02/09/30 18:17 ID:???] レス先まちがえますた。>>104ですた。スマソ 108 名前：102 mailto:sage [02/09/30 19:18 ID:???] >>106 ありがとうございました。たいへん満足するサイトでした。 109 名前：名無しさん＠１周年 [02/10/01 23:32 ID:lySnJLDM] ちょっと聞きたいんだけどここにいる人ってどの程度のレベル？ perl5.6(or 5.8)のregexp+utf8のバグ直せる人いるかな？ 110 名前：nobodyさん mailto:sage [02/10/02 00:25 ID:???] >>109 どういうバグ？ 111 名前：思ったこと mailto:sage [02/10/02 04:10 ID:???] スレタイに沿ったまともな会話がみつからない。 一応そってるって言えばそってるけど、 雑談スレかい？これ。 112 名前：nobodyさん <sage> mailto:sage [02/10/02 07:20 ID:???] >>111 違うよ。 CGIに依存しないPerlの話題一般だよ。 113 名前：111 mailto:sage [02/10/02 19:37 ID:???] ベタな突っ込みありがとう。 俺は、これはこれでけっこう良スレだと思ってます。 ﾏﾀｰﾘしたのもいいですな。 114 名前：nobodyさん <sage> mailto:sage [02/10/04 08:45 ID:???] ム板の「Perlについての質問箱」がruby基地外によって潰されました。 心ある人は、rubyスレにお礼参りしてください。 115 名前：名無しさん＠１周年 [02/10/04 15:21 ID:Uohsiqib] >>110 "\xc0\x80\xc0\x81\xc0\x82" =~ /\xc0\x80(.)\xc0\x82/; print $1,"\n"; "\xe0\x80\x80\xe0\x80\x81" =~ /\xe0\x80\x80(.)/; print $1,"\n"; "\xe0\x80\x80\xe0\x80\x81" =~ /(.)\xe0\x80\x81/; print $1,"\n"; 116 名前：nobodyさん [02/10/05 19:31 ID:diYif7N0] ANhttpdとActivePerlをインストールしました。 DOSプロンプトではPerlが動いているのを確認できました。 IEでhtmlを見るのにローカルのアドレスを指定してもサーバーがみつかりませんと怒られますた。 アドレスバーに打ち込んだのこれです localhost/~HTTPD以下のフォルダ名/ファイル名 どうしたら見れるでしょうか？ どなたか教えてください。 おながいします。 117 名前：nobodyさん mailto:sage [02/10/05 20:00 ID:???] >>116 localhostではなくて、127.0.0.1とした時に動くなら、 IEオプション-接続-LANの 「ローカルアドレスにはプロキシサーバーを使用しない」 をチェックする。 IPアドレスで接続できないなら、AN HTTPDの設定がおかしい。 118 名前：116 mailto:sage [02/10/05 20:52 ID:???] >>117 レスありがとうございます。 勉強になりました パス間違ってますた。 お騒がせしてすみません。 119 名前：nobodyさん mailto:sage [02/10/08 00:39 ID:???] ttp://www.thinkgeek.com/stuff/docs/perl-camel-source.shtml いつ見ても感動するなあ、これ。 120 名前：nobodyさん <sage> mailto:sage [02/10/08 02:54 ID:???] >>119 実行すると４頭のラクダになるんですね。ほんとスゴイなぁ。 121 名前：nobodyさん mailto:sage [02/10/08 03:07 ID:???] >>119 すげー！ 感動した！ 122 名前： ◆hMJAPH9PWA [02/10/16 11:41 ID:yifqZ1Vt] むむ。これは驚いた… =code sub f{ print "@_\n"; } f $x, ($x = 'foo'); =end いや〜、"foo foo"と出力されるとは思わなかった。 よく考えればPerlの関数の引数は参照渡しだからこうなるのも頷けるんだけど、 tieされたハッシュでFETCHすら呼ばれないのは困るね。 ok $h{foo}, delete $h{foo}; がnot okになって小一時間ほどはまったよ。 123 名前：nobodyさん mailto:sage [02/10/16 20:18 ID:???] 引数の順に左右される可能性のあるコードなんか、まともな奴は書かない。 124 名前：nobodyさん mailto:sage [02/10/17 02:57 ID:???] まあ、またーりいこうや。 人少ないんだしさ。 125 名前： ◆hMJAPH9PWA mailto:sage [02/10/17 13:23 ID:???] >>123 引数の評価の順、というよりは、"引数の参照渡し"という意味を心の底から実感したのが私的には重要だなぁ。 このあたり、C++だと罠がなくていいね。 126 名前：rubyist＠カラアゲうまうま mailto:aasawdw [02/10/29 06:43 ID:???] asf86we785f78wqtrf7wqgfrutewiftd97s6tcft8sdgof しねやｈにおｄｂｓｃｊ 127 名前：nobodyさん [02/10/31 11:02 ID:LYtKJNHh] 正規表現の構造を図にして出力してくれるライブラリって どこにあったっけ？ たしか海外のサイトでそんなのを見かけたんだけど・・。 128 名前：nobodyさん <sage> mailto:sage [02/10/31 23:04 ID:???] >>127 parrotの中のGraphViewじゃないか。 ６４MBあるんで、DLしたがインスコはやめてる。誰か、やってない？ 正規表現スレで聞いてみたら。 129 名前：127 mailto:sage [02/11/01 01:11 ID:???] >>128 ありがとうございます！ parrot と GraphView で Google や use Perl を検索しても 何も出てこなかったですけど、正規表現スレで聞いてみます。 130 名前：nobodyさん <sage> mailto:sage [02/11/01 08:21 ID:???] >>129 CPANのsearchでModuleを選んで検索汁。 131 名前：127 mailto:sage [02/11/01 10:30 ID:???] www.cc.rim.or.jp/~midorin/mad-p/RegexDiagram.html これの使い方を教えてホスィ！であります！ >>130 CPAN は既に検索しました。でも↑これがベターっぽい？です。 132 名前：127 mailto:sage [02/11/03 03:24 ID:???] ↑Win では tgif のヴューワがないらしい？ というわけで bourbon.cs.umd.edu:8001/tgif/ ここから Linux 用の tgif を DL して、 Linux 上で PDF に変換してから Win に持ってきて使うことにしますた。 133 名前：nobodyさん mailto:sage [02/11/12 01:49 ID:???] Cygwin + Xサーバ入れればtgif使えるよ。 134 名前：rubyist@カラアゲうまうま mailto:uiiiu [02/11/18 19:34 ID:???] tju6y7i78i78i78o89p98p;09;p09;p0p0p0p0p0p0p; 135 名前：nobodyさん [02/12/10 19:24 ID:7jw5awUE] @AAA　=　<OUTDATA>; って感じで、ハンドルの内容を取得してるのだが、めちゃくちゃ遅い（汗） 高速化する方法知ってる人いません？ 136 名前：nobodyさん mailto:sage [02/12/10 19:36 ID:???] $i=0; for(;$AAA[$i]=<OUTDATA>;$i++){;} 速くなるとはおもえんが。 137 名前：nobodyさん mailto:sage　　 [02/12/10 20:44 ID:???] $AAA= `cat file`; 138 名前：135 [02/12/11 11:49 ID:d9JpgDns] >>136 ためしてみましたが、速くはならないみたいです。 >>137 すみません。説明が足りませんでした。 ハンドルはopen/open2で取得した標準出力なので、実ファイルは ないんですよ。 やっぱり無理かなあ 139 名前：nobodyさん mailto:sage [02/12/11 11:54 ID:???] >>137 興味半分でそれ試して見たが 逆に遅くなったぞ（ｗ 140 名前： ◆hMJAPH9PWA mailto:sage [02/12/11 12:08 ID:???] >>138 push @array, $_ while <OUTDATA>; とでもすれば少しはマシになる事もあるかな。 でも配列に入れる必要がないなら、配列に入れないのが一番いいだろうね。 141 名前：おまんこは地球を救う [02/12/11 14:11 ID:QC8qbww2] yahooo.s2.x-beat.com/linkvp/linkvp.html 142 名前：nobodyさん mailto:sage [02/12/11 23:42 ID:???] 配列にぶち込んでる時点で負け。 allocするコストがでかいから、1行単位に読んだ方がはやかったりするよ。 143 名前：nobodyさん [02/12/14 01:12 ID:u240v51k] Wordのデータファイルをperlでプレーンテキストだけ出したいんですけど Wordのデータファイルの構造がのっているサイトとかありませんか? 144 名前：nobodyさん mailto:sage [02/12/14 01:19 ID:???] ２５歳。 去年まで金無し君だったけど、オンラインカジノとパチンコで 二年で３５０万貯めた。一度やってみなよ。 初回のみだけど、１ドル以上のチップを買えば３０ドル（４０００円くらい）貰える。 もらうだけもらってプレイせずに換金することもできるし、ルーレットで赤か黒に 思い切って賭けてしまえば５０パーセントで二倍になる。 金なきゃオフラインでゲームすればいいだけ。暇つぶしになる。 ビデオポーカーとかスロとか色々あるのでマジでお勧め。 www.imperialcasino.com/~1kl5/japanese/ 145 名前：nobodyさん mailto:sage [02/12/14 05:11 ID:???] ２５歳。 去年まで菜食主義だったけど、吉野家の牛丼並で 二年で３５０杯食った。一度行ってみなよ。 牛丼の日のみだけど、１杯以上の並を買えばスピードくじ貰える。 もらうだけもらって外れても味噌汁か玉子に換金することもできるし、 思い切って特盛にすれば５５０円で二倍になる。 金なきゃお茶飲んで帰ればいいだけ。店員にマークされる。 ねぎだくとか牛鮭とか色々あるのでマジでお勧め。 146 名前：nobodyさん mailto:sage [02/12/16 23:29 ID:???] >>143 自分でさがしてみてなければ自分で作る。 んで、それをサイトに公開するとアンタが一番乗りの栄誉。多分。 147 名前：nobodyさん mailto:sage [02/12/24 11:45 ID:???] 今使ってるperlソースの本体が大きいため、パフォーマンス向上の為に dump　label; label： を使用してundumpで取り出したソースを使えないかと相談されました。 なんでも実行時のperlソースのコンパイルが一番時間がかかるらしい。 これって要するに変数の使用領域とかずっと固定になると思うんです が、大丈夫なもんなんですか？　もしパフォーマンスが上がって安全 であれば、もっと一般的な手法になってそうなので。要は動作させるた めの安全性を知りたいわけです。使用してるperlのverは5.6です。 148 名前：nobodyさん [02/12/24 12:17 ID:pfcNuncp] ageてみる。 >147 別に使用領域は固定ではなかろう？ 149 名前：nobodyさん [02/12/24 23:24 ID:2kS8TiT1] >>147 ソースを書き直すとかCで書き直すとかの選択はなしですか? 150 名前：147 [02/12/25 14:30 ID:Uwnh35ZY] ソース修正はありですが、期間とコストの問題で全面改修は無理との事です。 dumpのほかにperlccを使用することも検討しているようなのですが。 151 名前：nobodyさん mailto:sage [02/12/25 14:52 ID:???] >>150 Apache::Registry 使うのがてっとり早くていいでしょう。 152 名前：まつり [02/12/25 15:17 ID:bCo3fgvu] ex.2ch.net/test/read.cgi/entrance/1040792699/ 153 名前：147 [02/12/25 15:19 ID:Uwnh35ZY] >>151 webサーバーがネットスケープサーバーという。 私もそれ最初に言って却下されますた．． 154 名前：nobodyさん [02/12/25 17:20 ID:X8KgKfIl] んでPerl6はいつでますの？ 大方 JavaVM=ParrotVM Jave+Perl+Python=Perl6 みないなもんだろうけど 155 名前：nobodyさん mailto:sage [02/12/25 17:48 ID:???] にちゃんねるの鯖監視所みたいな鯖監視やってみたいんですが URLを設定して それがGET出来た場合1を返すプログラムってどんな感じなるんでしょうか？ 156 名前：nobodyさん [02/12/25 20:50 ID:TE37817o] >>155 1. Connect出来たらTRUE 2. HTTP/1.1 200 OKならTRUE 3. 持ってきた内容に、指定したキーワードが入ってたらTRUE どれがいい? 157 名前：nobodyさん [02/12/26 12:01 ID:GtbbpgRM] >>156 2ですかね？ 余裕があれば3 158 名前：nobodyさん mailto:sage [03/01/02 16:49 ID:???] Perlでネットワーク関連のおもちゃ作ってるんですが バイナリデータの処理はやっぱpackやunpackでいいんですかね ビットフィールドの扱いはvec関数がいいとかは聞いたんですが。。 159 名前：(･∀･)p mailto:(･∀･) [03/01/05 16:54 ID:???] WINでDOS窓消して、バックグラウンドで実行する方法って無いでつか？ WHSよりPERLの方が使い慣れてるので･･･ 160 名前： ◆hMJAPH9PWA mailto:sage [03/01/05 19:16 ID:???] >>158 用途が違うのでいいとか悪いとかは無いよ。 やりたい事が実現できるのならどっちでもいいと思う。 >>159 wperl script.pl で。 ただしSTDERRの出力先は開けといた方がいいかも。 161 名前：(♥・∀・） mailto:sage [03/01/05 20:21 ID:???] おおー　　有難う御座います　>>◆hMJAPH9PWA さま wperl(とVER付きの実行ファイル)は自分でも何となく試したのですが、パスの指定が間違えて居た様です。 拡張子を関連付けたら上手く行きますた STDERRは適当にリダイレクトして使いたいと思います。 侍のVBSを色々弄ってるんですが、文字列の扱いに辟易してたんです これで正規表現パワー炸裂できます やっぱりPERLはｲｲ(･∀･)!! 多謝!! 162 名前：nobodyさん mailto:sage [03/01/08 01:05 ID:???] >>153 Netscape enterprise server ならNSAPIでPerl組み込めばイイじゃん。 search.cpan.org/author/BSUGARS/nsapi_perl-0.24/ Netscape::Registry とか色々あるよ。 163 名前：nobodyさん mailto:sage [03/01/08 01:08 ID:???] >>158 ぃえす。pack()/unpack()で気持ち良くなれます。 ただ32bit以上の大きめな桁で論理演算しようとすると悲しいことが起こるので、 そーいうときは分割して処理するかMath::BigIntをつかうかXSで書くとよろし。 164 名前：158 mailto:sage [03/01/08 23:50 ID:???] >>160 >>163 仕事が忙しくて来れませんですた。。 レスさんきぅです。やぱしpack、unpackがラクでいいですね。 それと、話ついでの質問で恐縮ですが、 時刻合わせのためにNTPサーバに接続して タイムスタンプを取得しますよね。 そんで自分のPCをサーバに同期させる、 というようなプログラムを作ってるんですが、 DOSに取得した時刻を渡すことってできるんでしょうか？ 自PCがWinXPなので system("C:\windows\cmd.exe"); でDOSを開くところまでは行ったんですがそのあとが分かりません。。 pack、unpackと全く関係ない質問で申し訳ないですが(;´д`)A 165 名前：nobodyさん [03/01/10 11:50 ID:deTFlKvI] 腐れﾏｶｰのみんな、CamelBonesで、Perl + Cocoaしよう。 RealBASICが買えないチミにおすすめですよ。 sourceforge.net/projects/camelbones/ 166 名前：山崎渉 mailto:（＾＾）sage [03/01/15 13:34 ID:???] （＾＾） 167 名前：nobodyさん [03/02/17 16:45 ID:sH+lSeTa] Delegateでない、普通の串をPerlで作りたいんですが、無理ですか？ Proxomitronに限界を感じる… 168 名前：nobodyさん [03/02/18 13:07 ID:AzMunH4n] みんな気がついてないのか？ 気がついていていえないのか？ どうみてもスレタイ日本語変だろ？ Perlに依存しないCGIの話題一般　っていうなら日本語になってるｗ 169 名前：nobodyさん mailto:sage [03/02/18 15:14 ID:???] 3つ目の選択肢。 ・気がついていて言わないのか？ 170 名前：nobodyさん mailto:sage [03/02/18 15:16 ID:???] なんでPerlのスレなのに逆の意味になるんだYO アフォ 171 名前：nobodyさん mailto:sage [03/02/18 18:39 ID:???] CGIに依存しない、Perlの話題。これでわからないか? 172 名前：nobodyさん mailto:sage [03/02/18 19:22 ID:???] >>168はPerlをCGI専用の言語だと思ってるのかな？ 173 名前：nobodyさん mailto:sage [03/02/18 19:38 ID:???] ＣＧＩってのはライブラリか何かだと？ 174 名前：nobodyさん mailto:sage [03/02/18 22:39 ID:???] 一般と書いたら、一般にしないといけないそうです。 175 名前：nobodyさん mailto:sage [03/02/19 09:32 ID:???] やっぱ話題のレベルが下がると俄然伸びるなぁ。 176 名前：山崎渉 mailto:（＾＾） [03/03/13 17:14 ID:???] （＾＾） 177 名前：nobodyさん [03/03/30 18:00 ID:Okt0zbYe] Perl 5.8なんですが， use encoding 'euc-jp'; $a = 'あ'; print '1' if $a eq 'あ'; print '2' if $a =~ /あ/; だと「1」が出力されます。 use encoding 'euc-jp', Filter=>1; $a = 'あ'; print '1' if $a eq 'あ'; print '2' if $a =~ /あ/; だと「12」が出力されます。 どうしてでしょう？　スクリプトはEUCで書いてます。 178 名前：マリモーマ ◆r6PDGT6Xd2 [03/03/31 05:02 ID:opWXfh3V] >>177 そりゃ　両方成り立ってるからでは？ 179 名前：nobodyさん mailto:sage [03/03/31 05:11 ID:???] まあひとつ言えることはおそらく板違いだということ。 プログラム技術板にPerlスレあるだろ。 WebProgに依存しないと言ったら確実に板違いだな。 180 名前：nobodyさん mailto:sage [03/03/31 08:59 ID:???] >>179 Perl・CGI／レンタルサーバ板からPerl・CGIがPHP板に移動してきて出来たのがWebProg板なので板違いではありません 181 名前：4 [03/03/31 16:29 ID:i9DdbQyy] >>177 12とでるのは、print '1';print '2'だから、12と思う。 ここは分かってるよね？ $a = 'あ'; print '1' if $a eq 'あ'; print '2' if $a =~ /\Qあ\E/; というのはどうだろうか？ しかし、EUCなら/あ/で通ると思うが.. $a = 'あ'; print '1' if $a eq "\xa4\xa2"; print '2' if $a =~ /\xa4\xa2/; で、12とでる？ 182 名前：nobodyさん mailto:sage [03/03/31 19:18 ID:???] >>179 177が板違いなのは間違いないがスレ自体が板違いの可能性大 スレタイの日本語からしておかしいが WebProg版のスレなのだからPerlに依存しないCGI一般の話題と解釈するのが普通 100歩譲ってCGIに限定しないPerlの話題一般 と解釈するならばこのスレ自体が板違い 183 名前：nobodyさん mailto:sage [03/04/03 11:58 ID:???] >>182 昔からPerlはプログラム板とは独立してレン鯖板にあって、 それがココに移ってきたから板違いじゃない。 新参者は出て行けと言うつもりはないが、昔からの慣習を無知のまま勝手な事言うのは勘弁。 184 名前：nobodyさん [03/04/04 00:08 ID:tjlK2qT8] >>181 #!/bin/perl use encoding 'euc-jp'; $a = 'あ'; print '1' if $a eq 'あ'; print '2' if $a =~ /\Qあ\E/; print '3' if $a =~ /\xa4\xa2/; からは1が出力され， #!/bin/perl $a = 'あ'; print '1' if $a eq 'あ'; print '2' if $a =~ /\Qあ\E/; print '3' if $a =~ /\xa4\xa2/; からは123が出力されます。 いまいちEncode.pmがわからないです。 185 名前：nobodyさん mailto:sage [03/04/04 00:28 ID:???] >>184件のスクリプトをテストしてみたが スクリプトの漢字コードeucで保存してる？ スクリプトの漢字コードが Jisなら1だけ Shift-Jisなら1,2 EUC-JPなら1,2,3 が出力されておるのだが・・・ \xa4\xa2 はEUC-JPのコードだからSJIS JISでまっちしないというのはりかいできるだろうけど Jisならば KI KOが入るから　\Qあ\E　のパターンマッチは失敗してるってかんじでないかい？ 186 名前：nobodyさん [03/04/04 01:00 ID:???] てめえらperlのコンパイル手順について詳しく、超詳しく書いてあるサイト教えやがれ。 日本語のな。 187 名前：nobodyさん mailto:sage　釣りか? [03/04/04 01:14 ID:???] >>186 自分で出来ねーんだったらエラそーにすんな 大体OSもいわねーのに手順も糞もあるかボケ 188 名前：4 [03/04/04 02:36 ID:QX5gDFpX] >>186 $ perlcc foo.pl 話題にのって質問。 perlを無料でwindowsのexeにコンパイルできないだろうか? 贅沢言うとTk.pmも使いたいのですが。 ActivePerlのperlccは単体では使えないもよう。 189 名前：184 [03/04/04 02:39 ID:tjlK2qT8] >>185 下のスクリプトから123が出てくるのは期待通りなんですが， 上から1しかでてこないのが理解不能なんです。 use encodingの使い方間違ってる？ 190 名前：251 mailto:sage [03/04/04 02:42 ID:???] >>188 perl2exe ttp://www.indigostar.com/perl2exe.htm がexeにできるけどシェアウェアか・・・ どうせおもちゃだし・・・ 191 名前：nobodyさん mailto:sage [03/04/04 03:24 ID:???] >>189 encodingプラグマを理解していないんじゃない？ >>185で回答してもらっているでしょ なんのためにencoding使おうとしている？ 192 名前：nobodyさん mailto:sage [03/04/04 04:49 ID:???] >>183 だから、それならプログラム版に移ればよかっただけの話だろ 大量の２ｃｈ系掲示板郡が散在していて、 それぞれの掲示板がそれぞれの流儀でカテゴライズするのはかまわないが 板が増えてくれば、それなりにカテゴライズされた法則にしたがって運用しなけりゃ ただのごみため場と化すのが自然の理 別鯖の板をどこかに移動するなら移動先のカテゴライズにしたがわなきゃダメだろ 移動するときプログラム版が許容量いっぱいで無理だったとかか？ それなら、移動する時期を誤ったか　無理せずもとの場所で存続するか 元の場所が閉鎖せざるを得ないとかの問題があったなら、ここ以外の他の場所探せばよかっただけだろ？ 少なくとも、移ってきたから板違いじゃないっていうのは見当違い 193 名前：nobodyさん mailto:sage [03/04/04 08:53 ID:???] >>192 よーするにだ。後から出てきて勝手な講釈たれんなﾎﾞｹナス。 そー言う事。 194 名前：nobodyさん mailto:sage [03/04/04 13:55 ID:???] よーするにだ。最初からあったこのスレの内容がﾜｹﾜｶ。 そー言う事。 195 名前：nobodyさん mailto:sage [03/04/04 19:33 ID:???] WebProgだけ別にした管理者が馬鹿。 196 名前：nobodyさん mailto:sage [03/04/07 06:35 ID:???] それだけWebプログラム関連の負荷が大きかったって事だろ まぁ、板作るなら WebProgじゃなく NetProg だろ・・とは思うけどな 197 名前：nobodyさん mailto:sage [03/04/08 00:48 ID:???] だってム板にたてたらおっぱらわれるじゃん… 198 名前：デフォルトの名無しさん [03/04/08 10:41 ID:ibnCgWfp] もうるびキティいなくなったから大丈夫だよ。 199 名前：nobodyさん mailto:sage [03/10/31 01:47 ID:???] テストかきこ 200 名前：nobodyさん [03/11/04 16:26 ID:ZhxpP0UW] 随分落ちてるなage 201 名前：nobodyさん [03/11/06 23:56 ID:GvRKtYWY] perlのパイプってのは非同期なのでしょうか？ b.pl　　　　　　　　　---------------------------------処理終了 |パイプ開始　　|パイプクローズ a.pl-----------------------------処理終了 パイプでデータを一通り渡し終えた後、b.plの処理が終わる前にa.plが死んでも問題ないでしょうか？ また、b.plが終了するまでa.plのパイプクローズがブロッキングされたりはしないのでしょうか？ 答えてもらえたら前代未聞の2ch閲覧環境の開発を開始します。 202 名前：nobodyさん mailto:sage [03/11/07 12:29 ID:???] そりゃあ前代未聞だ 203 名前：nobodyさん mailto:sage [03/11/08 22:34 ID:???] >>201 確かに前代未聞だ。 答え。やってみれば良い。理論上は、close処理をしっかりすれば動作するはずだが。 204 名前：nobodyさん [03/11/08 23:12 ID:U/fdC1Uy] ActivePerlで試したよ。 local($from,$to,@data) = @_; unless(open(DELI,"| " . $deliveryprocess . " " . $from . " " . $to)){ return 0; } print DELI @data; close(DELI); return 1; てなコードで、 #! /usr/bin/perl print $ARGV[0] . "\r\n"; print $ARGV[1] . "\r\n"; while(<STDIN>){ print; } while(1){} なスクリプトにパイプでデータ送ったら見事にブロックしてくれやがりました。 開発中止。 205 名前：nobodyさん [03/12/15 05:04 ID:Scf5jbcR] 普通は同期を想定しているパイプで*パイプを同期で扱うスクリプト*を使って試せば、それは*同期な結果*しか帰って来ないだろう、頭悪い。 非ブロッキングにしたかったらちゃんとおぷちょん書きなさい。 206 名前：nobodyさん mailto:sage [03/12/15 06:33 ID:???] >>205 > 普通は 普通でない場合について詳しく教えてください。 207 名前：nobodyさん [03/12/15 22:28 ID:qGs1Vqs+] >>205 一ヶ月前のレスを煽ってるのも大概だと思われ。 208 名前：nobodyさん mailto:sage [03/12/17 12:28 ID:???] あれれ、5.8.2が出たのか めんどくさいなあ 209 名前：nobodyさん mailto:sage [04/05/20 13:10 ID:???] perl 5.005 を使っていますが、 このような古い環境で UTF-8 → Shift JIS (EUC でも可) の 変換方法がありましたらお教え願えますか? 210 名前：nobodyさん mailto:sage [04/05/20 13:57 ID:???] >>209 search.cpan.org/~dankogai/Jcode-0.83/ openlab.ring.gr.jp/Jcode/index-j.html pc5.2ch.net/test/read.cgi/php/1081148490/ pc5.2ch.net/test/read.cgi/tech/1079114157/ 211 名前：209 mailto:sage [04/05/20 14:07 ID:???] >>210 jcode.pl の方ばかりを気にしていたので.pm の方をすっかり失念していました。 スレ汚しすいませんでした。 212 名前：nobodyさん [04/05/26 11:48 ID:3xdgk57n] use strict; sub new { 　my $that = shift; 　my $class = ref($that) || $that; 　my $self = { a=>{A=>'A',B=>'B'}, b=>[qw/A B/] }; 　bless ($self, $class); 　return $self; } sub method { 　my $self = shift; 　my $a = $self->{'a'}; 　my $b = $self->{'b'}; } $a,$bをデリファレンスして利用するのではなくて 型グロブで選択的別名定義して%a,@bと実装できますか？ できるのでしたらどのように実装するのでしょうか？ 213 名前：nobodyさん mailto:sage [04/05/26 17:14 ID:???] sub method{ my $self = shift; our(%a, @b); # or use vars pragma local *a = $self->{a}; local *b = $self->{b}; $a{foo} = 1; push @b, 'foo'; } またはAlias.pmとかな。 search.cpan.org/~gsar/Alias-2.32/Alias.pm どっちにしてもあまりメリットは感じないが。 214 名前：nobodyさん [04/08/08 10:03 ID:Ejd6WZ6r] sub new { 　my $pkg = shift; 　bless 　{ 　　name => shift, 　　age => shift 　　equips => undef 　}, $pkg; } ここでequipsを配列にしたいのですが、 そのような事は可能でしょうか？ push($self->{equips}, $object); $self->{equips}->[1]->getEffect(); ($objectは別のクラスオブジェクトでgetEffectはそのメソッド) みたいな感じで使いたいのですが。 215 名前：nobodyさん mailto:sage [04/08/08 13:06 ID:???] equips を配列へのリファレンスにすることならできる sub new { 　my $pkg = shift; 　bless 　{ 　　name => shift, 　　age => shift, 　　equips => [] 　}, $pkg; } としておいて push(@{$self->{equips}}, $object); $self->{equips}->[1]->getEffect(); 216 名前：nobodyさん mailto:sage [04/08/09 19:13 ID:???] 巷のスクリプトを見るとPerlでサブルーチンにプロトタイプ宣言を行っていない ものがほとんどなのですが、なぜプロトタイプ宣言を行っていないのでしょうか？ プロトタイプ宣言を行うと低速化したりという弊害等があるのでしょうか？ sub func($$@)　#プロトタイプ宣言あり sub func　　　　　#プロトタイプ宣言無し 217 名前：nobodyさん mailto:sage [04/08/09 20:38 ID:???] >>216 反対に、宣言しなくてもいいのにわざわざ宣言するメリットって何? その「巷のスクリプト」とやらはサブルーチン呼び出すのに & つけてたり、メソッドとして呼び出してたりしてないか? あと Perl 関係のメインスレは以下なので以後はそちらに。 pc5.2ch.net/test/read.cgi/php/1089779036/ pc5.2ch.net/test/read.cgi/tech/1090889189/ 218 名前：nobodyさん mailto:sage [04/08/09 21:35 ID:???] >>217 コンパイルタイムの型チェックと最適化がされるらしいので、 より効率的でより安全だと思うのですが。 219 名前：nobodyさん mailto:sage [04/08/20 07:16 ID:???] らしいじゃなぁ PerlOPみて調べて自分で考えろ 220 名前：nobodyさん mailto:sage [04/08/31 01:56 ID:???] >>219 要するにあなたは何も知らないんですね ;-) 221 名前：山崎 渉 ◆hG4XfSMGTg mailto:sage [2006/02/17(金) 13:07:09 ID:???] ブヒャヒャヒャヒャｗｗｗｗｗｗｗ 222 名前：nobodyさん mailto:sage [2007/02/10(土) 21:36:53 ID:???] 簡単にお金稼ぎ！！！ 以下の手順でやれば、無料でお金稼ぎができます。 企業も広告の宣伝になるから、お金をくれるわけです。 最初の１日目で 2000 円〜3000 円 は確実に稼げます。 実際の作業は数十分程度、１時間はかかりません。 (1) sinsetsu.lxl.jp/#.2ch.net 　 　↑このアドレスからサイトに行く。 (2) ゲットマネー登録サイトに移動するので、 　そこで無料会員登録をする。 　※フリーメールアドレスでもＯＫ。 (3)ポイントを稼ぎます。 　懸賞の応募や無料会員登録をすればするほど、 　ポイントが貰えます。 　他にも沢山種類があるので、１日目で 　約 20000 ポイントは GET できます。 (4) 10000 ポイントから、現金に交換できます。 (5)キャッシュバックという所がありますので、 　そこから交換をしましょう。 これで現金を稼ぐといいですよ！！！ 無料会員登録はこちらから↓ sinsetsu.lxl.jp/#.2ch.net 223 名前：nobodyさん mailto:sage [2007/03/23(金) 07:33:44 ID:???] >>168 お前頭悪いなｗｗｗ ばああああああああああああああああああああかｗｗｗｗｗｗｗｗｗｗｗｗ 死ねクズｗｗ

---

---

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef