perl
とりあえず、簡単なものを。 単純に-xで出力される右列のアスキーをつらつらと表示するだけ。 使い方 # tcpdump port ほげほげ -ieth0 -s 1500 -x | ./myfilter.pl myfilter.pl #!/usr/bin/perl while(<STDIN>){ if(m/^[ \t]/){ #print "Line: $_\n"; @data = (spli</stdin>…
とりあえず、簡単なものを。 単純に-xで出力される右列のアスキーをつらつらと表示するだけ。 使い方 # tcpdump port ほげほげ -ieth0 -s 1500 -x | ./myfilter.pl myfilter.pl #!/usr/bin/perl while(<STDIN>){ if(m/^[ \t]/){ #print "Line: $_\n"; @data = (spli</stdin>…