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