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

1 ：use Socket;：02/03/10 01:50 ID:Q1gcj2Im.net

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

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

55 ：nobodyさん：02/03/26 00:11 ID:AmQVaL8y.net

616765a

56 ：use Socket;：02/03/26 02:41 ID:???.net

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

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

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

57 ：nobodyさん：02/03/26 11:44 ID:???.net

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

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

58 ：nobodyさん：02/03/26 17:40 ID:???.net

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

59 ：use Socket;：02/03/26 18:17 ID:???.net

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

60 ：nobodyさん：02/03/27 11:02 ID:???.net

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

61 ：nobodyさん：02/03/29 18:33 ID:dJEnZQgW.net

age

62 ： ：02/03/31 17:15 ID:+CJv1xys.net

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

63 ：nobodyさん：02/03/31 18:28 ID:???.net

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

64 ： ：02/04/06 03:00 ID:Q2ecuzSu.net

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

65 ：nobodyさん：02/04/06 06:28 ID:???.net

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

66 ：64：02/04/06 22:33 ID:ZVzzBO7a.net

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

67 ：nobodyさん：02/04/07 02:50 ID:???.net

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

68 ：nobodyさん：02/04/07 05:30 ID:0gb5rv3T.net

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

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

69 ：nobodyさん：02/04/07 05:53 ID:???.net

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

70 ：nobodyさん：02/04/07 10:05 ID:???.net

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

71 ：nobodyさん：02/04/09 03:39 ID:???.net

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

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

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

72 ：nobodyさん：02/04/30 21:03 ID:???.net

test

73 ：nobodyさん：02/05/01 06:52 ID:???.net

hoge

74 ：nobodyさん：02/07/16 22:48 ID:???.net

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

75 ：socket初心者：02/10/04 05:19 ID:EErsm4Mz.net

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): $!";

76 ：n：02/10/04 05:52 ID:ixFnVKaB.net

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

77 ：nobodyさん：02/10/04 12:54 ID:???.net

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

78 ： ◆U5598YGuzE ：02/10/04 12:56 ID:???.net

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

79 ：nobodyさん：02/10/04 12:59 ID:???.net

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

80 ：use Socket;：02/12/17 21:53 ID:+/VfoKAG.net

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

81 ：nobodyさん：02/12/24 17:17 ID:2kS8TiT1.net

age

82 ：山崎渉：03/01/15 13:40 ID:???.net

（＾＾）

83 ：山崎渉：03/03/13 17:41 ID:???.net

（＾＾）

84 ：nobodyさん：03/04/17 10:19 ID:GlJoeOTi.net

age

85 ：山崎渉：03/04/17 11:57 ID:???.net

（＾＾）

86 ：山崎渉：03/04/20 06:27 ID:???.net

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

87 ：nobodyさん：03/04/26 15:16 ID:z2X+CXJ9.net

age

88 ：nobodyさん：03/04/26 16:25 ID:???.net

めんどくさそうだね

89 ：山崎渉：03/05/22 02:07 ID:???.net

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

90 ：山崎渉：03/05/28 17:18 ID:???.net

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

91 ：山崎 渉：03/07/15 11:16 ID:???.net

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

92 ：山崎 渉：03/08/02 02:35 ID:???.net

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

93 ：ぼるじょあ ◆ySd1dMH5Gk ：03/08/02 05:15 ID:???.net

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

94 ：山崎 渉：03/08/15 23:04 ID:???.net

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

95 ：nobodyさん：04/06/02 23:56 ID:RiFz2Frq.net

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

96 ：nobodyさん：04/06/03 00:08 ID:???.net

% perldoc -m Socket

97 ：nobodyさん：04/07/23 22:27 ID:28JcNBl1.net

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

98 ：nobodyさん：04/12/22 18:58:48 ID:???.net

hoshu

99 ：nobodyさん：2007/07/04(水) 23:17:40 ID:/v4FuUdg.net

2年半ぶりにage

100 ：nobodyさん：2007/09/26(水) 12:31:28 ID:???.net

101 ：nobodyさん：2008/12/24(水) 01:35:52 ID:???.net

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

102 ：電脳プリオン：2011/12/11(日) 22:18:01.05 ID:???.net ?2BP(1960)

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

103 ：nobodyさん：2013/04/02(火) 16:25:44.30 ID:zXz89sBa.net

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

104 ：nobodyさん：2017/12/30(土) 12:46:23.50 ID:YhlYw6jg.net

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

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

MSFB9JBFN5