Split 

my $address = '192.168.18.24';

my @parts = split '.', $address;

say Dumper(\@parts);

$VAR1 = [];