I can't believe someone mod'ed this down without pointing out why...

If you want to split on the period char you need to do it one of these ways...

split(/\./);
# or
split(/[.]/);
[download]

The period is special in regular expressions, like the one split uses to find separators. You just told split that every character was a legal separator and if you do that you get a big fat nada...

--
$you = new YOU;
honk() if $you->love(perl)