Help for this page

Select Code to Download

Select or download this

if ( $inLine =~ /
             (                 # $1 - first IP
...
    $_ = $ip if $port;             # replace IP if got port
  }
}