Select Code to Download

strace -o /tmp/out -f perl -e 'print `ssh localhost -tt -l root tcpdum
+p -c10 -nntttt`'

use strict;
use warnings;
...
  print "TEST - $server\n$net\n\n";
}