トップページ
ひらく | たたむ | ページトップ
↓マウスで反転選択した文字を検索
Perl
   
ページ内検索 ページ外検索
検索したい文字を入力して
ENTERを押すと移動します。
\n
[ トップページ ]
[ ____CommandPrompt ] [ ____JScript ] [ ____MySQL ] [ ____Cygwin ] [ ____Java ] [ ____Emacs ] [ ____Make ] [ ____Perl ] [ ____Python ] [ ____OpenGL ] [ ____C# ] [ ____StyleSheet ] [ ____C++ ] [ ____Winsock ] [ ____Thread ] [ ____VisualStudio ] [ ____C ] [ ____Win32API ] [ ____Lua ] [ ____PhotoShop ]
ヘッダ検索
___

■ Network





    #!/usr/bin/perl

    use IO::Socket;

    $sock = new IO::Socket::INET(PeerAddr=>'www.google.co.jp',
        PeerPort=>80,
        Proto=>'tcp');

    die "IO::Socket : $!" unless $sock;

    print $sock "GET / HTTP/1.0\r\n\r\n";

    print < $sock>

    close($sock);

    exit;


















NINJAIDX 7