my @octets = split('\\.',  $ip);
my @octets = split(qr/\./, $ip);
my @octets = split(/\./,   $ip);