mirror of
https://github.com/hak5/bashbunny-payloads.git
synced 2025-10-29 16:58:25 +00:00
Update Bunny.pl
This commit is contained in:
@@ -29,7 +29,7 @@ use NetPacket::ICMP qw(ICMP_ECHOREPLY ICMP_ECHO);
|
|||||||
use Net::RawIP;
|
use Net::RawIP;
|
||||||
use Fcntl;
|
use Fcntl;
|
||||||
|
|
||||||
print "Bunny waitin' for his friend...\n";
|
print "Bunny waitin' for connection...\n";
|
||||||
|
|
||||||
# create raw socket
|
# create raw socket
|
||||||
my $sock = IO::Socket::INET->new(
|
my $sock = IO::Socket::INET->new(
|
||||||
@@ -40,7 +40,7 @@ my $sock = IO::Socket::INET->new(
|
|||||||
# set stdin to non-blocking
|
# set stdin to non-blocking
|
||||||
fcntl(STDIN, F_SETFL, O_NONBLOCK) or die "$!";
|
fcntl(STDIN, F_SETFL, O_NONBLOCK) or die "$!";
|
||||||
|
|
||||||
print "Let's wait for PingUin!\n";
|
print "Let's wait for PingZhell!\n";
|
||||||
|
|
||||||
my $input = '';
|
my $input = '';
|
||||||
while(1) {
|
while(1) {
|
||||||
|
|||||||
Reference in New Issue
Block a user