> 112.58.26.32.32770 > 192.35.51.30.53: 64596[|domain] (DF) > 112.58.26.32.32770 > 192.100.59.110.53: 24685 [1au][|domain] (DF) > 112.58.26.4.2506 > 216.148.227.69.80: . ack 3280436924 win 2920 (DF) > 112.58.26.4.2506 > 216.148.227.69.80: . ack 1759 win 1162 (DF) > 112.58.26.4.2498 > 66.207.130.76.80: . ack 2195940947 win 7906 (DF) > 112.58.26.4.2498 > 66.207.130.76.80: R 2576805184:2576805184(0) win 0 (DF) >
perl -ne '@a[/(\d+):/]++}{print "Port 53: $a[53]\t Port 80: $a[80]\n"' infile.txt Port 53: 2 Port 80: 4 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]