ablog

不器用で落着きのない技術者のメモ

Linux で TCP 接続しているリモートホストのIPアドレス・ポート番号・ソケットのinode番号を表示する Perl ワンライナー

Linux Perl 
perl -lane '$F[2]=~/(..)(..)(..)(..):(....)$/;printf qq/ip:%d.%d.%d.%d port:%d inode:%d\n/, map hex, $4,$3,$2,$1,$5,$F[9]' /proc/net/tcp6

実行してみるとこんな感じ。

$ perl -lane '$F[2]=~/(..)(..)(..)(..):(....)$/;printf qq/ip:%d.%d.%d.%d port:%d inode:%d\n/, map hex, $4,$3,$2,$1,$5,$F[9]' /proc/net/tcp6
ip:0.0.0.0 port:0 inode:0
ip:0.0.0.0 port:0 inode:26821906
ip:0.0.0.0 port:0 inode:26821936
ip:0.0.0.0 port:0 inode:26821913
ip:0.0.0.0 port:0 inode:26821908
ip:0.0.0.0 port:0 inode:25188
ip:0.0.0.0 port:0 inode:26821904
ip:192.168.***.52 port:1521 inode:33846281
ip:192.168.***.113 port:1602 inode:33961285
ip:192.168.***.52 port:1521 inode:33830690
ip:192.168.***.52 port:1521 inode:33827073
ip:192.168.***.52 port:1521 inode:33575508
ip:192.168.***.52 port:1521 inode:33575273
ip:192.168.***.52 port:1521 inode:33849714
ip:192.168.***.109 port:1780 inode:25175961

参考