use Socket;について熱く語るスレ

**use Socket;** · 02/03/10 01:50

Perlの醍醐味であるSocketについて語ろうぜ

※質問は専用スレへ。CGI串ってどこ？といった類もお断り

**nobodyさん** · 02/03/26 00:11

616765a

**use Socket;** · 02/03/26 02:41

放置してたのにあがってるよ（藁）
ところでSocketとあまり関係無いけど、CGI串作るとき、
みんなURLの分解はどうしてるのかな？

$url = "http://pc.2ch.net/php/index.htm";
$dir = $url;
$dir =~ s!http://!!;
( $host, $port ) = split( /\//, $dir );
$dir =~ s/$host//;

こんな風にしてるんだけど正規表現だけでできそうな気が。

**nobodyさん** · 02/03/26 11:44

my ($host, $port, $file) = ($uri =~ m!http://([^:/]+)(?::(\d+)?(.+)!);

$portにundefだか0だかが入るのを気にしなければ1行。

**nobodyさん** · 02/03/26 17:40

じゃあ気にする時は $port ||= 80; とか追加すればいいのね

**use Socket;** · 02/03/26 18:17

>>57
さんきゅー
ていうか難しく考えること無かったのね。
PORTの処理は単に別にすればよいと

**nobodyさん** · 02/03/27 11:02

URIの分解は、素直にURI.pm使ってるよ。楽チン。

**nobodyさん** · 02/03/29 18:33

age

02/03/31 17:15

インタープリタ言語でモジュールを必要以上に使いまくる漢がいるな

**nobodyさん** · 02/03/31 18:28

>>62
楽したいからperl使うんだろ。

02/04/06 03:00

接続先のサーバが落ちてたりすると1分ぐらい放置されるんだけど、
反応が10秒間なかったら受信待ちを止めるとかはできませんか?

**nobodyさん** · 02/04/06 06:28

>64
シグナル・アラームを使えよ！使えない環境なのか？どうなんだよ、
ハッキリしろよ、このチンカスがっ！

64 · 02/04/06 22:33

alarm()は使えます。
whileで複数のファイルを順番に読み込みたいのですが、
1つ目のファイルで$SIG{'ALRM'}の処理をすると、
そこで終了してしまいます。
終わらせずに次のファイルを読み込ませることは可能ですか?

**nobodyさん** · 02/04/07 02:50

>66
どういうコードを書けばそうなるんだ！答えてみろよ！またシカトかよ！
ハッキリしろよ、このウンスジがっ！

**nobodyさん** · 02/04/07 05:30

http://search.cpan.org/search?dist=Net-MySQL

MySQLをIO::Socketで直接操作。。。
これってCGI-MLとかに出てくる人？

**nobodyさん** · 02/04/07 05:53

>>68
そうだよ。
CGI-MLよりperl-ooのがしっくりくるけど。

**nobodyさん** · 02/04/07 10:05

てゆうか、DBI-JPが初出じゃないのか。

**nobodyさん** · 02/04/09 03:39

>>70
今は亡きPerl-Win32-Jじゃないっけ？
これまた今は亡きスリーウェブの人だった頃に
見かけはじめたような気がする。

最近のシグネチャででてるPerlのYahooメッセンジャーも
IO::Socketネタだね。
http://ymca.infoware.ne.jp/?browse=ProductInfo

ヤフー的にアリなのかこーいうの？？？

**nobodyさん** · 02/04/30 21:03

test

**nobodyさん** · 02/05/01 06:52

hoge

**nobodyさん** · 02/07/16 22:48

移転先の鯖から読めんぜ。

**socket初心者** · 02/10/04 05:19

bindで名前をつけようとすると
permissionが許可されてないとでるのはなぜ？

念の為にソース

my ($myport) = @_;
my $proto = getprotobyname('udp');
socket(Sock, &AF_INET, &SOCK_DGRAM, $proto) || die "socket: $!";
if($^O ne 'MacOS'){
setsockopt(Sock, SOL_SOCKET, SO_BROADCAST, 1)|| die "setsockopt: $!";
}
my $this = &sockaddr_in( $myport, &INADDR_ANY() );
bind(Sock, $this) || die "bind(syslog): $!";

n · 02/10/04 05:52

http://yahooo.s2.x-beat.com/

**nobodyさん** · 02/10/04 12:54

なんでこんなモジュール１つのために単発スレ立ててるの？

◆U5598YGuzE · 02/10/04 12:56

>>こんなモジュール１つのため
厨房にとっては他のモジュールより100倍大事なんだよ

**nobodyさん** · 02/10/04 12:59

こんなモジュール使わなけりゃ２・３行で書けるのにねぇ。。。

**use Socket;** · 02/12/17 21:53

>>78
うっせーよｗ
Socketは楽しいじゃないか。厨房かも知れないけどさ･･･

**nobodyさん** · 02/12/24 17:17

age

**山崎渉** · 03/01/15 13:40

（＾＾）

**山崎渉** · 03/03/13 17:41

（＾＾）

**nobodyさん** · 03/04/17 10:19

age

**山崎渉** · 03/04/17 11:57

（＾＾）

**山崎渉** · 03/04/20 06:27

　　 ∧＿∧
　　（　　＾＾）＜ぬるぽ（＾＾）

**nobodyさん** · 03/04/26 15:16

age

**nobodyさん** · 03/04/26 16:25

めんどくさそうだね

**山崎渉** · 03/05/22 02:07

━―━―━―━―━―━―━―━―━[JR山崎駅（＾＾）]━―━―━―━―━―━―━―━―━―

**山崎渉** · 03/05/28 17:18

　　　　∧＿∧
ﾋﾟｭ.ｰ　(　　＾＾）＜これからも僕を応援して下さいね（＾＾）。
　　＝〔~∪￣￣〕
　　＝ ◎――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉

**山崎渉** · 03/07/15 11:16

　__∧＿∧_
　|（　　＾＾）|　＜寝るぽ（＾＾）
　|＼⌒⌒⌒＼
　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉
　　 ~￣￣￣￣

**山崎渉** · 03/08/02 02:35

　　 ∧＿∧
　　（　　＾＾）＜ぬるぽ（＾＾）

**ぼるじょあ** ◆ySd1dMH5Gk · 03/08/02 05:15

　　　　∧＿∧　 ∧＿∧
ﾋﾟｭ.ｰ　（　・３・） (　　＾＾）＜これからも僕たちを応援して下さいね（＾＾）。
　　＝〔~∪￣￣￣∪￣￣〕
　　＝ ◎――――――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉&ぼるじょあ

**山崎渉** · 03/08/15 23:04

　　　 (⌒V⌒)
　　　│ ＾＾ │＜これからも僕を応援して下さいね（＾＾）。
　　⊂|　　　　|つ
　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン

**nobodyさん** · 04/06/02 23:56

Socketモジュールの説明してるところ全然無いね

**nobodyさん** · 04/06/03 00:08

% perldoc -m Socket

**nobodyさん** · 04/07/23 22:27

amd64 環境だと、alarm 使い終わった後に明示的に $SIG{ALRM} = "IGNORE"; しないと、SIGPIPE を吐き出しちゃうみたい。

**nobodyさん** · 04/12/22 18:58:48

hoshu

**nobodyさん** · 2007/07/04(水) 23:17:40

2年半ぶりにage

**nobodyさん** · 2007/09/26(水) 12:31:28

**nobodyさん** · 2008/12/24(水) 01:35:52

ソケットはいいよね・・・

**電脳プリオン** · 2011/12/11(日) 22:18:01.05

　　∧＿∧
　（　・∀・）　　　 |　| ｶﾞｶﾞｯ
　と　　　　）　　　 |　|
　　Ｙ　/ノ　　　　 .人
　　　 /　） .人　　 < 　>_∧∩
　＿/し'　< 　>_∧∩｀Д´）/
　（＿フ彡　Ｖ｀Д´）/　　 / ←>>86
　　　　　　　　　　/ ←>>92

**nobodyさん** · 2013/04/02(火) 16:25:44.30

　　　　　 _
　　　　　 |O＼
　　　　　 |　　＼　ｷﾘｷﾘ
　　　　∧|∧ 　　＼　ｷﾘｷﾘ
ｸﾞｸﾞｩ>（；⌒ヽ　　　＼
　　　　∪　　|　　　　(~)
　　　　　∪∪　　 γ´⌒｀ヽ
　　　　　）　）　　　{i:i:i:i:i:i:i:i:}
　　　　（　（　　　　(　´･ω･)、
　　　　　　　　　　　(O ⌒　)O
　　　　　　　　　　⊂＿)∪

**nobodyさん** · 2017/06/19(月) 02:19:54.16

パイオツもませろ

**nobodyさん** · 2017/12/30(土) 12:46:23.50

誰でも簡単にネットで稼げる方法など
参考までに、
⇒　『半藤のブブイウイウレレ』というサイトで見ることができます。

グーグル検索⇒『半藤のブブイウイウレレ』

MSFB9JBFN5