Help for this page

Select Code to Download

Select or download this

$ perl -Mstrict -Mwarnings -le '
    my $cell = <<EOD;
...
    print "@extract";
'
TCP:13-13 UDP:13-13 TCP:37-37 UDP:37-37 UDP:123-123