Select Code to Download

#!/usr/bin/perl 
use warnings;
...
}
__DATA__
tcp 20 tcp 40 tcp 80

<code>
C:\Code>perl outtest.pl
...
Address1=20
Address2=40
Address3=80