Skip to content

Instantly share code, notes, and snippets.

@ChinaXing
Created January 4, 2016 09:53
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ChinaXing/00c6c7422717915ce5e9 to your computer and use it in GitHub Desktop.
Save ChinaXing/00c6c7422717915ce5e9 to your computer and use it in GitHub Desktop.
kill tcp connection
use Net::RawIP;
$n = Net::RawIP->new({
ip => {
saddr => '10.200.183.2',
daddr => '10.200.180.30'
},
tcp => {
source => 3317,
dest => $ARGV[0],
fin => 1,
seq => $ARGV[1],
ack => 1,
}
});
$n->send;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment