Aaah - - - regexes in Perl can be both a Boon and a Bane!
You are splitting on "." - the regex for any character - - so all you are going to get back is what is between each character - - - nothing!
So split on "\."
You haven't forgotten how Split works - - just overlooked how regexes work! :)