Revision 0b8b2454
Von Sven Schöling vor mehr als 9 Jahren hinzugefügt
SL/Locale.pm | ||
---|---|---|
376 | 376 |
sub parse_date_to_object { |
377 | 377 |
my ($self, $string, %params) = @_; |
378 | 378 |
|
379 |
return undef if !defined $string; |
|
380 |
|
|
379 | 381 |
$params{dateformat} ||= $::myconfig{dateformat} || 'yy-mm-dd'; |
380 | 382 |
$params{numberformat} ||= $::myconfig{numberformat} || '1,000.00'; |
381 | 383 |
my $num_separator = $params{numberformat} =~ m{,\d+$} ? ',' : '.'; |
Auch abrufbar als: Unified diff
Locale: Bei parase_date_string undef sofort undef zurückgeben.