Help for this page
if (/\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}/){ s/\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}/xxx.xxx.xxx.xxx/g; print VPNOUTFILE "$_"; }
if (s/\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}/xxx.xxx.xxx.xxx/g) { print VPNOUTFILE "$_"; }
if (s/\d+\.\d+\.\d+\.\d+/xxx.xxx.xxx.xxx/g) { print VPNOUTFILE "$_"; }