Split 

my $address = '192.168.18.24';

my @parts = split /[.]/, $address;

say Dumper(\@parts);

$VAR1 = [
  '192',
  '168',
  '18',
  '24'
];