...
my $datum = '01.02.2006';
my @_date = split('.', $datum);
foreach my $date_part (@_date){
   print "Part: $date_part\n";
}
...