Many others already replied you very well offering various different solution. I'll just add that, if you just need to skip the first elements of a string split, you can write as follows:

# Skips first two elements
(undef, undef, $val1, $val2) = split(/\./, $string);
[download]

Michele.