if (s/\d+\.\d+\.\d+\.\d+/xxx.xxx.xxx.xxx/g) {
  print VPNOUTFILE "$_";
}