my @array = split /:/; # the $_ is implied
my $foo = $array[1];