Select Code to Download

use strict;

...
  {
  print "$_" if s/(?:\b\d{1,3}\.){3}\d{1,3}\b/xxx.xxx.xxx.xxx/g;
  }

__DATA__
set something 111.111.111.111 255.255.255.0
...
set something xxx.xxx.xxx.xxx xxx.xxx.xxx.xxx
set something else xxx.xxx.xxx.xxx
set some things 1234.123.123.123 xxx.xxx.xxx.xxx 123.123.123.1234