close

 

運用對於Linux防火牆中的連線追蹤系統的了解
利用Perl程式語言撰寫一支查詢連線狀況的程式

#!/usr/bin/perl

open ( CONN, "/proc/net/ip_conntrack" ) or die "ip_conntrack kernel module is not loaded\n";

while( <CONN> )
{
$_ =~ /.*src=(.*?\s)/ ;
$src_ip{ $1 }++ ;
}

foreach ( sort { $src_ip{ $a } <=> $src_ip{ $b } } keys %src_ip )
{
printf( "IP address : %-20s has %-5dconnections\n", $_, $src_ip{ $_ } ) ;
}

來源：奇科電腦Ben老師  http://www.geego.com.tw

arrow
arrow
    全站熱搜

    台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄