Re^2: Custom date string formatting

[AltBlue]

you could be even more liberal by using [^\d]+:

sub format_date {
  return join '.', (split /[^\d]+/, $_[0])[2,1,0];
}