gprot

来自「netflow,抓包」· 代码 · 共 19 行

#!/usr/bin/perl

#
# convert unix /etc/{protocols} format to flow-tools
#

while (<>) {

  chomp;

  next if (/^\s*#/);

  @f = split;

  print "$f[1] $f[0]\n";

}